describe cc,e,ph,q and i in Commands also. Allows word completion

1 files changed, 7 insertions, 0 deletions

diff --git a/src-3.0/GF/Command/Commands.hs b/src-3.0/GF/Command/Commands.hs
index a7ba9bed8..1742012d9 100644
--- a/src-3.0/GF/Command/Commands.hs
+++ b/src-3.0/GF/Command/Commands.hs
@@ -63,6 +63,10 @@ commandHelp full (co,info) = unlines $ [
 -- this list must be kept sorted by the command name!
 allCommands :: PGF -> Map.Map String CommandInfo
 allCommands pgf = Map.fromAscList [
+  ("cc", emptyCommandInfo),
+  ("e",  emptyCommandInfo),
+  ("ph", emptyCommandInfo),
+  ("q",  emptyCommandInfo),
   ("gr", emptyCommandInfo {
      longname = "generate_random",
      synopsis = "generates a list of random trees, by default one tree",
@@ -91,6 +95,9 @@ allCommands pgf = Map.fromAscList [
                 _ -> "command not found"
        _ -> commandHelpAll pgf opts)
      }),
+  ("i", emptyCommandInfo {
+     options = ["prob", "retain", "gfo", "src", "no-cpu", "cpu", "quiet", "verbose"]
+     }),
   ("l", emptyCommandInfo {
      exec = \opts -> return . fromStrings . map (optLin opts),
      options = ["all","record","table","term"],