aboutsummaryrefslogtreecommitdiffhomepage
diff options
context:
space:
mode:
-rw-r--r--package.json2
-rw-r--r--src/PursLoader/Loader.purs3
2 files changed, 3 insertions, 2 deletions
diff --git a/package.json b/package.json
index f9e5646..1491de6 100644
--- a/package.json
+++ b/package.json
@@ -1,6 +1,6 @@
1{ 1{
2 "name": "purs-loader", 2 "name": "purs-loader",
3 "version": "0.6.0-beta.2", 3 "version": "0.6.0-beta.3",
4 "description": "PureScript loader for webpack", 4 "description": "PureScript loader for webpack",
5 "license": "MIT", 5 "license": "MIT",
6 "repository": "ethul/purs-loader", 6 "repository": "ethul/purs-loader",
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