Sat Nov 25 10:30:00 CET 2006 pdm@brailcom.org
authorpdm <pdm>
Sat, 25 Nov 2006 09:30:58 +0000 (09:30 +0000)
committerpdm <pdm>
Sat, 25 Nov 2006 09:30:58 +0000 (09:30 +0000)
  * Remove punctuation in ordinal numbers when it is converted to a word

czech.scm

index 7be4bfc..408b10b 100644 (file)
--- a/czech.scm
+++ b/czech.scm
          (czech-item.feat? token 'punc ".")
          (item.next token)
          (not (string-matches (item.feat token "n.whitespace") "  +")))
+    (item.set_feat token 'punc "")
     (if (not (czech-item.has-feat token 'punctype))
         (item.set_feat token 'punctype 'num))
     (append (czech-number* token name)