Remove erroneous parens around columns in SELECT statement

These were causing runtime errors... whoops!
This commit is contained in:
William Carroll 2020-07-30 19:52:04 +01:00
parent 6ecab8c3a6
commit 8ebc89b44b
5 changed files with 8 additions and 8 deletions

View file

@ -24,4 +24,4 @@ delete dbFile tripPK =
-- | Return a list of all of the trips in `dbFile`.
list :: FilePath -> IO [T.Trip]
list dbFile = withConnection dbFile $ \conn ->
query_ conn "SELECT (username,destination,startDate,endDate,comment) FROM Trips"
query_ conn "SELECT username,destination,startDate,endDate,comment FROM Trips"