command cm

This commit is contained in:
aarne
2004-12-29 13:48:41 +00:00
parent ac57016275
commit 7eb83ba64e
4 changed files with 39 additions and 25 deletions

View File

@@ -20,6 +20,7 @@ data Command =
CImport FilePath
| CRemoveLanguage Language
| CEmptyState
| CChangeMain (Maybe I.Ident)
| CStripState
| CTransformGrammar FilePath
| CConvertLatex FilePath
@@ -161,7 +162,7 @@ optionsOfCommand co = case co of
CWriteFile _ -> none
CAppendFile _ -> none
CSpeakAloud -> flags "language"
CPutString -> flags "filter length"
CPutString -> both "utf8" "filter length"
CShowTerm -> flags "printer"
CSystemCommand _ -> none