aboutsummaryrefslogtreecommitdiff
path: root/scm
diff options
context:
space:
mode:
authorSergey Poznyakoff <gray@gnu.org>2018-09-16 22:37:58 +0300
committerSergey Poznyakoff <gray@gnu.org>2018-09-16 22:37:58 +0300
commit9be3f798a55ae3b5db89ee9439ce2a14664b8b25 (patch)
tree4bffbb1543d53d0000c0d1c2ddd51574555fd6eb /scm
parent3c71deb63229da1bf3e75470499048bdce378966 (diff)
downloadellinika-9be3f798a55ae3b5db89ee9439ce2a14664b8b25.tar.gz
ellinika-9be3f798a55ae3b5db89ee9439ce2a14664b8b25.tar.bz2
Upgrade gint
Diffstat (limited to 'scm')
-rw-r--r--scm/dictrans.scm7
1 files changed, 2 insertions, 5 deletions
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.