diff options
| author | aarne <unknown> | 2004-08-15 21:02:10 +0000 |
|---|---|---|
| committer | aarne <unknown> | 2004-08-15 21:02:10 +0000 |
| commit | c96162ba8b228e0e2db0202c4ee155103537488a (patch) | |
| tree | 5407a7e20c138ace5606e63aa891eba46c1bbf62 /src/GF/UseGrammar/Custom.hs | |
| parent | f65d08638bb0cded9b4c74d810696e920fcebb65 (diff) | |
experiments with unlexer
Diffstat (limited to 'src/GF/UseGrammar/Custom.hs')
| -rw-r--r-- | src/GF/UseGrammar/Custom.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/GF/UseGrammar/Custom.hs b/src/GF/UseGrammar/Custom.hs index 3fb386c79..60c906fa0 100644 --- a/src/GF/UseGrammar/Custom.hs +++ b/src/GF/UseGrammar/Custom.hs @@ -301,7 +301,7 @@ customUntokenizer = ,(strCI "code", const $ formatAsCode) ,(strCI "textlit", const $ formatAsTextLit) ,(strCI "codelit", const $ formatAsCodeLit) - ,(strCI "concat", const $ concat . words) + ,(strCI "concat", const $ concatRemSpace) ,(strCI "glue", const $ performBinds) ,(strCI "reverse", const $ reverse) ,(strCI "bind", const $ performBinds) -- backward compat |