summaryrefslogtreecommitdiffabout
authorSergey Poznyakoff <gray@gnu.org>2018-09-16 19:37:58 (GMT)
committer Sergey Poznyakoff <gray@gnu.org>2018-09-16 19:37:58 (GMT)
commit9be3f798a55ae3b5db89ee9439ce2a14664b8b25 (patch) (side-by-side diff)
tree4bffbb1543d53d0000c0d1c2ddd51574555fd6eb
parent3c71deb63229da1bf3e75470499048bdce378966 (diff)
downloadellinika-9be3f798a55ae3b5db89ee9439ce2a14664b8b25.tar.gz
ellinika-9be3f798a55ae3b5db89ee9439ce2a14664b8b25.tar.bz2
Upgrade gint
Diffstat (more/less context) (ignore whitespace changes)
m---------gint0
-rw-r--r--scm/dictrans.scm7
2 files changed, 2 insertions, 5 deletions
diff --git a/gint b/gint
-Subproject fd86bf7d44b0c970771830692ae7491447ebe8b
+Subproject 170187a26c9788b17f2e2a66ca5b6116e7e7295
diff --git a/scm/dictrans.scm b/scm/dictrans.scm
index 9f1cfd5..9e6051e 100644
--- a/scm/dictrans.scm
+++ b/scm/dictrans.scm
@@ -90,9 +90,6 @@
(ellinika xlat)
(ice-9 getopt-long))
-(if (= (string->number (major-version)) 1)
- (use-modules (ice-9 syncase)))
-
(setlocale LC_ALL "")
(define compile-only #f)
@@ -330,7 +327,7 @@
rest)
(xmltrans:parse-error #f tag " used in wrong context")))))
-;;; Hanlde main element
+;;; Handle main element
(xmltrans:start-tag
"DICT"
(tag attr)
@@ -416,7 +413,7 @@
"T"
(tag attr text)
(cond
- ((not (xmltrans:attr attr "ID"))) ;; Ignore. Warnings has already been issued
+ ((not (xmltrans:attr attr "ID"))) ;; Ignore. Warning has already been issued
((xmltrans:parent? "P")
(current-article-set #:topic (xmltrans:attr attr "ID")))
((xmltrans:parent? "NODE")

Return to:

Send suggestions and report system problems to the System administrator.