module PursLoader.Options
- ( Options()
+ ( Options(..)
, runOptions
) where
import PursLoader.Path (joinPath)
-newtype Options = Options { pscBundle :: String }
+newtype Options = Options { bundleOutput :: String }
-type Options_ = { pscBundle :: String }
+type Options_ = { bundleOutput :: String }
runOptions :: Options -> Options_
runOptions (Options options) = options
instance isForeignOptions :: IsForeign Options where
read obj =
- Options <$> ({ pscBundle: _ }
- <$> (maybe pscBundleDefault id <<< runNullOrUndefined <$> readProp pscBundle obj))
+ Options <$> ({ bundleOutput: _ }
+ <$> (maybe bundleOutputDefault id <<< runNullOrUndefined <$> readProp bundleOutput obj))
where
- pscBundle :: String
- pscBundle = "pscBundle"
+ bundleOutput :: String
+ bundleOutput = "bundleOutput"
- pscBundleDefault :: String
- pscBundleDefault = joinPath "output" "bundle.js"
+ bundleOutputDefault :: String
+ bundleOutputDefault = joinPath "output" "bundle.js"