haskell/esqueleto
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Merge pull request #75 from snoyberg/master

Browse Source 
Fix for #74
This commit is contained in:
Felipe Lessa 2014-09-18 11:49:20 -03:00
commit 87288f9603
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
src/Database/Esqueleto/Internal/Sql.hs
View File

@ -970,7 +970,7 @@ instance PersistEntity a => SqlSelect (SqlExpr (Entity a)) (Entity a) where
where where
process ed = uncommas $ process ed = uncommas $
map ((name <>) . fromDBName info) $ map ((name <>) . fromDBName info) $
(entityID ed:) $ (sqlIdName ed:) $
map fieldDB $ map fieldDB $
entityFields ed entityFields ed
-- 'name' is the biggest difference between 'RawSql' and -- 'name' is the biggest difference between 'RawSql' and