Update CommonDataStorage.hs