complete word completion in the shell. works for commands, flags, options, abstract syntax identifiers and NL strings

src-3.0/GF/System/UseReadline.hs

@@ -18,6 +18,8 @@ import System.Console.Readline
 
 fetchCommand :: String -> IO (String)
 fetchCommand s = do
+  setCompletionAppendCharacter Nothing
+  setBasicQuoteCharacters ""
   res <- readline s
   case res of
    Nothing -> return "q"