diff --git a/Handler/Search.hs b/Handler/Search.hs index 6d500be..23efc89 100755 --- a/Handler/Search.hs +++ b/Handler/Search.hs @@ -33,9 +33,9 @@ getSearchR = do case res of FormSuccess query -> do mediumList <- runDB $ do - a <- rawSql "select ?? from medium where ? % any(string_to_array(title, ' ');" + a <- rawSql "select ?? from medium where ? % any(string_to_array(title, ' '))" [PersistText query] - b <- rawSql "select ?? from medium where ? % any(string_to_array(description, ' ');" + b <- rawSql "select ?? from medium where ? % any(string_to_array(description, ' '))" [PersistText query] return $ sortBy (\ sa sb -> compare (T.unpack $ mediumTitle $ entityVal sa)