diff options
Diffstat (limited to 'Pancake')
-rw-r--r-- | Pancake/Command.hs | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/Pancake/Command.hs b/Pancake/Command.hs index 5126146..4c34a19 100644 --- a/Pancake/Command.hs +++ b/Pancake/Command.hs @@ -61,6 +61,7 @@ data Command = Quit | Shortcut String String | ReloadConfig | SetWidth (Maybe Int) + | Redisplay deriving (Show, Eq) -- | Parses a user command. @@ -77,6 +78,7 @@ basicCommand = choice . map (\(s, c) -> try (string s <* eof) *> pure c) $ , ("reload config", ReloadConfig) , ("help", Help) , ("?", ShowCurrent) + , ("redisplay", Redisplay) , ("", More)] -- | Link number parser. |