abhin4v/ps-simple-rest-service
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

Fixes the module names

Browse Source
This commit is contained in:
Abhinav Sarkar 2017-09-30 14:03:12 +05:30
parent 4e3ba59b9e
commit 1929eeee6b
3 changed files with 5 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
src/SimpleService/Handler.purs
View File

@ -14,8 +14,8 @@ import Database.PostgreSQL as PG
import Node.Express.Handler (Handler)
import Node.Express.Request (getBody, getRouteParam)
import Node.Express.Response (end, sendJson, setStatus)
import SimpleServer.Persistence as P
import SimpleServer.Types
import SimpleService.Persistence as P
import SimpleService.Types
getUser :: forall eff. PG.Pool -> Handler (postgreSQL :: PG.POSTGRESQL | eff)
getUser pool = getRouteParam "id" >>= case _ of

4
src/SimpleService/Persistence.purs
View File

@ -1,4 +1,4 @@
module SimpleServer.Persistence
module SimpleService.Persistence
( insertUser
, findUser
, updateUser
@ -12,7 +12,7 @@ import Control.Monad.Aff (Aff)
import Data.Array as Array
import Data.Maybe (Maybe)
import Database.PostgreSQL as PG
import SimpleServer.Types (User(..), UserID)
import SimpleService.Types (User(..), UserID)
insertUserQuery :: String
insertUserQuery = "insert into users (id, name) values ($1, $2)"

2
src/SimpleService/Types.purs
View File

@ -1,4 +1,4 @@
module SimpleServer.Types where
module SimpleService.Types where
import Prelude