Expand map-file and unmap-file interactive help

This commit is contained in:
Nikolay Yakimov 2015-12-20 06:38:28 +03:00
parent 7afb810f64
commit a1079f22a0

View File

@ -186,14 +186,19 @@ interactiveCommandsSpec =
icmds = icmds =
commands commands
<> command "map-file" <> command "map-file"
$$ info mapArgSpec $$ info (helper <*> mapArgSpec)
$$ progDesc "tells ghc-modi to read `file.hs` source from stdin" $$ progDesc "tells ghc-modi to read `file.hs` source from stdin"
<=> footer "File end marker is `\\n\\EOT\\n`,\
\ i.e. `\\x0A\\x04\\x0A`. `file.hs` may or may not exist, and should be\
\ either full path, or relative to project root."
<> command "unmap-file" <> command "unmap-file"
$$ info unmapArgSpec $$ info (helper <*> unmapArgSpec)
$$ progDesc "unloads previously mapped file, so that it's no longer mapped." $$ progDesc "unloads previously mapped file, so that it's no longer mapped."
<=> footer "`file.hs` can be full path or relative to\
\ project root, either will work."
<> command "quit" <> command "quit"
$$ info (pure CmdQuit) $$ info (pure CmdQuit)
$$ progDesc "Exits interactive mode" $$ progDesc "Exit interactive mode"
<> command "" <> command ""
$$ info (pure CmdQuit) idm $$ info (pure CmdQuit) idm
leftover = many (strArg "") leftover = many (strArg "")