From 87b55df10f00fd23d89a89bfb7c4354ff455d83d Mon Sep 17 00:00:00 2001 From: aarne Date: Tue, 11 Jan 2005 15:06:12 +0000 Subject: -val optimization --- src/GF/Shell/ShellCommands.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'src/GF/Shell/ShellCommands.hs') diff --git a/src/GF/Shell/ShellCommands.hs b/src/GF/Shell/ShellCommands.hs index a3e5d3b94..dda54e1c9 100644 --- a/src/GF/Shell/ShellCommands.hs +++ b/src/GF/Shell/ShellCommands.hs @@ -134,7 +134,7 @@ testValidFlag st co f x = case f of optionsOfCommand :: Command -> ([String],[String]) optionsOfCommand co = case co of - CImport _ -> both "old v s opt src retain nocf nocheckcirc cflexer noemit o" + CImport _ -> both "old v s opt val src retain nocf nocheckcirc cflexer noemit o" "abs cnc res path" CRemoveLanguage _ -> none CEmptyState -> none -- cgit v1.2.3