aboutsummaryrefslogtreecommitdiffhomepage
path: root/src/PursLoader
diff options
context:
space:
mode:
Diffstat (limited to 'src/PursLoader')
-rw-r--r--src/PursLoader/Loader.purs3
1 files changed, 2 insertions, 1 deletions
diff --git a/src/PursLoader/Loader.purs b/src/PursLoader/Loader.purs
index 49c5f24..d1068b6 100644
--- a/src/PursLoader/Loader.purs
+++ b/src/PursLoader/Loader.purs
@@ -7,6 +7,7 @@ module PursLoader.Loader
7import Prelude (Unit(), ($), (>>=), (<$>), (<*>), (++), bind, const, id, pure, unit) 7import Prelude (Unit(), ($), (>>=), (<$>), (<*>), (++), bind, const, id, pure, unit)
8 8
9import Control.Apply ((*>)) 9import Control.Apply ((*>))
10import Control.Alt ((<|>))
10import Control.Bind (join) 11import Control.Bind (join)
11import Control.Monad.Eff (Eff(), foreachE) 12import Control.Monad.Eff (Eff(), foreachE)
12import Control.Monad.Eff.Exception (Error(), error) 13import Control.Monad.Eff.Exception (Error(), error)
@@ -63,7 +64,7 @@ loader ref source = do
63 64
64 addDependency ref (resourcePath ref) 65 addDependency ref (resourcePath ref)
65 66
66 either (\err -> callback (Just err) "") id 67 either (\err -> callback (toMaybe error' <|> Just err) "") id
67 (handle <$> name <*> dependencies <*> exports) 68 (handle <$> name <*> dependencies <*> exports)
68 where 69 where
69 handle :: String -> Array String -> String -> Eff (Effects eff) Unit 70 handle :: String -> Array String -> String -> Eff (Effects eff) Unit