Commit 7f393264 authored by Andrew Gibiansky's avatar Andrew Gibiansky

Do not crash on errors when setting flags, fixes #370

parent bb881aa0
...@@ -408,7 +408,7 @@ evalCommand _ (Module contents) state = wrapExecution state $ do ...@@ -408,7 +408,7 @@ evalCommand _ (Module contents) state = wrapExecution state $ do
Nothing -> doLoadModule modName modName Nothing -> doLoadModule modName modName
-- | Directives set via `:set`. -- | Directives set via `:set`.
evalCommand output (Directive SetDynFlag flags) state = evalCommand output (Directive SetDynFlag flags) state = safely state $
case words flags of case words flags of
[] -> do [] -> do
flags <- getSessionDynFlags flags <- getSessionDynFlags
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment