summaryrefslogtreecommitdiff
path: root/src-3.0/GF/Command
diff options
context:
space:
mode:
authorbjorn <bjorn@bringert.net>2008-06-02 15:32:01 +0000
committerbjorn <bjorn@bringert.net>2008-06-02 15:32:01 +0000
commit5073ac4e7f4c24aa412ed3a3c3d719532df9f637 (patch)
treee9e60a0b58800dcc71aee9df2361852105c25574 /src-3.0/GF/Command
parent20ea9ea5ec7c65ab01bff47d78f55e06b85fe79d (diff)
Honor the --name flag when generating output files. Set module name in generated Haskell modules correctly.
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 8761234cd..281c6f1cc 100644
--- a/src-3.0/GF/Command/Commands.hs
+++ b/src-3.0/GF/Command/Commands.hs
@@ -153,5 +153,5 @@ 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))