summaryrefslogtreecommitdiff
path: root/src/compiler/GF/Text
diff options
context:
space:
mode:
Diffstat (limited to 'src/compiler/GF/Text')
-rw-r--r--src/compiler/GF/Text/Lexing.hs4
1 files changed, 2 insertions, 2 deletions
diff --git a/src/compiler/GF/Text/Lexing.hs b/src/compiler/GF/Text/Lexing.hs
index 29647a786..4e07c2126 100644
--- a/src/compiler/GF/Text/Lexing.hs
+++ b/src/compiler/GF/Text/Lexing.hs
@@ -16,9 +16,9 @@ stringOp name = case name of
"words" -> Just $ appLexer words
"bind" -> Just $ appUnlexer bindTok
"unchars" -> Just $ appUnlexer concat
- "unlextext" -> Just $ capitInit . appUnlexer (unlexText . unquote)
+ "unlextext" -> Just $ appUnlexer (unlexText . unquote)
"unlexcode" -> Just $ appUnlexer unlexCode
- "unlexmixed" -> Just $ capitInit . appUnlexer (unlexMixed . unquote)
+ "unlexmixed" -> Just $ appUnlexer (unlexMixed . unquote)
"unwords" -> Just $ appUnlexer unwords
"to_html" -> Just wrapHTML
_ -> transliterate name