aboutsummaryrefslogtreecommitdiff
path: root/Command/Config.hs
diff options
context:
space:
mode:
Diffstat (limited to 'Command/Config.hs')
-rw-r--r--Command/Config.hs5
1 files changed, 2 insertions, 3 deletions
diff --git a/Command/Config.hs b/Command/Config.hs
index 47415999d..a79a4f077 100644
--- a/Command/Config.hs
+++ b/Command/Config.hs
@@ -62,9 +62,8 @@ seek (UnsetConfig name) = commandAction $ do
unsetGlobalConfig name
unsetConfig (ConfigKey name)
return True
-seek (GetConfig name) = commandAction $ do
- mv <- getGlobalConfig name
- case mv of
+seek (GetConfig name) = commandAction $
+ getGlobalConfig name >>= \case
Nothing -> stop
Just v -> do
liftIO $ putStrLn v