diff options
author | Sergey Poznyakoff <gray@gnu.org.ua> | 2011-06-15 17:30:48 +0300 |
---|---|---|
committer | Sergey Poznyakoff <gray@gnu.org.ua> | 2011-06-15 17:30:48 +0300 |
commit | d688c9630db459ec13e5311adaee05e651b3789d (patch) | |
tree | 760cad87ebfec5b42344cbd635e90b12c9f2e2fa /src/ellinika | |
parent | 516f479a1ddb3bb783a01e9ffb20ba051243ffd0 (diff) | |
download | ellinika-d688c9630db459ec13e5311adaee05e651b3789d.tar.gz ellinika-d688c9630db459ec13e5311adaee05e651b3789d.tar.bz2 |
Minor changes
* src/cgi-bin/conj.scm4: Mark unattested stems and verb classes.
* src/ellinika/conjugator.scm (conjugate): Fix empty conjugation
return.
* xml/pl/rhmata.xml: Update.
Diffstat (limited to 'src/ellinika')
-rw-r--r-- | src/ellinika/conjugator.scm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/ellinika/conjugator.scm b/src/ellinika/conjugator.scm index 8172686..069d641 100644 --- a/src/ellinika/conjugator.scm +++ b/src/ellinika/conjugator.scm | |||
@@ -461,7 +461,7 @@ AND i.tense=\"~A\" AND i.ident=f.ident" | |||
461 | (conj-list (get-conj-info (verb-get vinfo #:conj) | 461 | (conj-list (get-conj-info (verb-get vinfo #:conj) |
462 | voice mood tense))) | 462 | voice mood tense))) |
463 | (if (not conj-list) | 463 | (if (not conj-list) |
464 | (list (list #f #f #f #f #f #f) #f #f) | 464 | (list (list #f #f #f #f #f #f #f #f)) |
465 | (map car | 465 | (map car |
466 | (fold-right | 466 | (fold-right |
467 | (lambda (elt prev) | 467 | (lambda (elt prev) |