summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--gf.cabal4
-rw-r--r--src/compiler/GFI.hs3
2 files changed, 4 insertions, 3 deletions
diff --git a/gf.cabal b/gf.cabal
index 2044f9b50..2d3fad564 100644
--- a/gf.cabal
+++ b/gf.cabal
@@ -1,5 +1,5 @@
name: gf
-version: 3.3.10-darcs
+version: 3.3.11-darcs
cabal-version: >= 1.8
build-type: Custom
@@ -51,7 +51,7 @@ flag server
flag new-comp
Description: Make -new-comp the default
- Default: False
+ Default: True
library
build-depends: base >= 4.2 && <5,
diff --git a/src/compiler/GFI.hs b/src/compiler/GFI.hs
index f2afa9b78..980264042 100644
--- a/src/compiler/GFI.hs
+++ b/src/compiler/GFI.hs
@@ -184,7 +184,8 @@ execute1 opts gfenv0 s0 =
(style,q,s) = pOpts TermPrintDefault Qualified ws'
(new,ws') = case ws of
"-new":ws' -> (True,ws')
- _ -> (False,ws)
+ "-old":ws' -> (False,ws')
+ _ -> (flag optNewComp opts,ws)
case runP pExp (encodeUnicode utf8 s) of
Left (_,msg) -> putStrLn msg