diff options
author | defanor <defanor@uberspace.net> | 2017-11-28 13:48:06 +0300 |
---|---|---|
committer | defanor <defanor@uberspace.net> | 2017-11-28 13:48:06 +0300 |
commit | 95b669faeaca543eef02bd076e7c368e23a7463d (patch) | |
tree | 14a78bef631b6cca202375edded44e8bccbf1a72 /Pancake | |
parent | 151e3d381b3beedacff475f439c6340a656bc8c3 (diff) |
Use [ and ] instead of b and f for history navigation
Akin to info viewers, and these won't interfere with link enumeration.
Also use "quit" instead of "q".
Diffstat (limited to 'Pancake')
-rw-r--r-- | Pancake/Command.hs | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/Pancake/Command.hs b/Pancake/Command.hs index 028012a..c385dc2 100644 --- a/Pancake/Command.hs +++ b/Pancake/Command.hs @@ -69,9 +69,9 @@ parseCommand c = either (const Help) id . parse (command c) "user input" -- | Basic (constant) command parser. basicCommand :: Parser Command basicCommand = choice . map (\(s, c) -> try (string s <* eof) *> pure c) $ - [ ("q", Quit) - , ("b", Back) - , ("f", Forward) + [ ("quit", Quit) + , ("[", Back) + , ("]", Forward) , (",", GoTo Nothing RCurrent) , ("reload config", ReloadConfig) , ("help", Help) |