GitHub/gf-core
1
0 Fork 1
mirror of https://github.com/GrammaticalFramework/gf-core.git synced 2026-11-04 11:15:27 -07:00
Code Issues Packages Projects Releases Wiki Activity

simplified the treatment of politeness in Phrasebook

Browse Source
This commit is contained in:
aarne committed 2010-03-30 18:48:59 +00:00
1 parent de909a4e44
commit 5cb147fa19
24 files changed
+157 -183
Download Patch File Download Diff File Expand all files Collapse all files

No files matched your search

src/server/PGFService.hs
+1 -1
View File
@@ -157,7 +157,7 @@ doTranslateGroup pgf input mcat mfrom mto =
disamb lg from t =
if lg < 2
then []
else [("tree", "-- " ++ doText (doBind PGF.linearize pgf (disambLang from)) t)]
else [("tree", "-- " ++ doText (doBind (PGF.linearize pgf (disambLang from) t)))]
disambLang f = maybe f id $ PGF.readLanguage $ "Disamb" ++ PGF.showLanguage f
notDisamb = (/="Disamb") . take 6 . PGF.showLanguage