File tree 2 files changed +3
-3
lines changed
2 files changed +3
-3
lines changed Original file line number Diff line number Diff line change @@ -9,7 +9,7 @@ exports.mkPool = function (conInfo) {
9
9
} ;
10
10
}
11
11
12
- exports [ "connect'" ] = function ( pool ) {
12
+ exports . connectImpl = function ( pool ) {
13
13
return function ( error , success ) {
14
14
pool . connect ( function ( err , client ) {
15
15
if ( err ) {
Original file line number Diff line number Diff line change @@ -85,7 +85,7 @@ connectionInfoFromConfig c p = unsafeCoerce
85
85
86
86
-- | Makes a connection to the database via a Client.
87
87
connect :: Pool -> Aff Client
88
- connect = fromEffectFnAff <<< connect'
88
+ connect = fromEffectFnAff <<< connectImpl
89
89
90
90
-- | Runs a query and returns nothing.
91
91
execute :: forall a . Query a -> Array SqlValue -> Client -> Aff Unit
@@ -152,7 +152,7 @@ decodeFirst decode rows = decode <$> (rows !! 0)
152
152
153
153
foreign import mkPool :: ConnectionInfo -> Effect Pool
154
154
155
- foreign import connect' :: Pool -> EffectFnAff Client
155
+ foreign import connectImpl :: Pool -> EffectFnAff Client
156
156
157
157
foreign import runQuery_ :: String -> Client -> EffectFnAff (Array Foreign )
158
158
You can’t perform that action at this time.
0 commit comments