GitHub/gf-core
1
0
Fork 1
mirror of https://github.com/GrammaticalFramework/gf-core.git synced 2026-04-19 09:49:33 -06:00
Code Issues Packages Projects Releases Wiki Activity

unlexer bug ; "vilka" ; lib path warning ; p -lines result

Browse Source
This commit is contained in:
aarne
2006-03-21 13:57:38 +00:00
parent ed047e9429
commit 836026a3ce
8 changed files with 196 additions and 23 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
src/GF/Text/Text.hs
View File

@@ -60,7 +60,7 @@ formatAsCodeLit :: String -> String
formatAsCodeLit = formatAsCode . unwords . map unStringLit . words
formatAsText,formatAsHTML,formatAsLatex :: String -> String
formatAsText = formatAsTextGen (=="&-") (=="&-")
formatAsText = formatAsTextGen (const False) (=="&-")
formatAsHTML = formatAsTextGen (\s -> take 1 s == "<" || last s == '>') (const False)
formatAsLatex = formatAsTextGen ((=="\\") . take 1) (const False)