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

@@ -68,6 +68,8 @@ pCommand ws = case ws of
"i" : f : [] -> aUnit (CImport f)
"rl" : l : [] -> aUnit (CRemoveLanguage (language l))
"e" : [] -> aUnit CEmptyState
"cm" : a : [] -> aUnit (CChangeMain (Just (pzIdent a)))
"cm" : [] -> aUnit (CChangeMain Nothing)
"s" : [] -> aUnit CStripState
"tg" : f : [] -> aUnit (CTransformGrammar f)
"cl" : f : [] -> aUnit (CConvertLatex f)