summaryrefslogtreecommitdiff
path: root/src-3.0/GF/Command
diff options
context:
space:
mode:
authorkrasimir <krasimir@chalmers.se>2008-06-03 16:27:21 +0000
committerkrasimir <krasimir@chalmers.se>2008-06-03 16:27:21 +0000
commitbd1fd9569634240c26c9961298b7a4b503cc2c59 (patch)
tree43cab12ff9cacf50ca5a5ca2423b1c95b7b64434 /src-3.0/GF/Command
parent952e51d8f70305b19f54f85f8c7feb9eb8475e44 (diff)
fix conflicts
Diffstat (limited to 'src-3.0/GF/Command')
-rw-r--r--src-3.0/GF/Command/Commands.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/src-3.0/GF/Command/Commands.hs b/src-3.0/GF/Command/Commands.hs
index 221a7da02..d1fb4dd4c 100644
--- a/src-3.0/GF/Command/Commands.hs
+++ b/src-3.0/GF/Command/Commands.hs
@@ -160,7 +160,7 @@ allCommands pgf = Map.fromAscList [
prGrammar opts = case valIdOpts "printer" "" opts of
"cats" -> unwords $ categories pgf
- v -> prPGF (read v) pgf
+ v -> prPGF (read v) pgf (prCId (absname pgf))
wordCompletion opts = do
let lang = head (optLangs opts)