aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorKenichi Handa2003-01-16 07:56:55 +0000
committerKenichi Handa2003-01-16 07:56:55 +0000
commit2af778bdd1f4c6c8d1e21c85467facaeb58593d5 (patch)
tree6010ad92bd2903398d2c35ecd9426e570538f118
parentf80734b88a4dcaf473d9e1887591b0c15055744a (diff)
downloademacs-2af778bdd1f4c6c8d1e21c85467facaeb58593d5.tar.gz
emacs-2af778bdd1f4c6c8d1e21c85467facaeb58593d5.zip
Undo the last change.
-rw-r--r--lisp/international/ucs-tables.el2
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/international/ucs-tables.el b/lisp/international/ucs-tables.el
index 68a73e57bf2..9a14da44a01 100644
--- a/lisp/international/ucs-tables.el
+++ b/lisp/international/ucs-tables.el
@@ -1111,7 +1111,7 @@ Translates from the iso8859 charsets and `mule-unicode-0100-24ff'.")
1111 1111
1112 ;; Derive tables that can be used as per-coding-system 1112 ;; Derive tables that can be used as per-coding-system
1113 ;; `translation-table-for-encode's. 1113 ;; `translation-table-for-encode's.
1114 (dolist (n (list 15 14 9 8 7 6 5 4 3 2 1)) 1114 (dolist (n (list 15 14 9 8 7 5 4 3 2 1))
1115 (let* ((alist (symbol-value (intern (format "ucs-8859-%d-alist" n)))) 1115 (let* ((alist (symbol-value (intern (format "ucs-8859-%d-alist" n))))
1116 (encode-translator (set (intern (format "ucs-8859-%d-encode-table" 1116 (encode-translator (set (intern (format "ucs-8859-%d-encode-table"
1117 n)) 1117 n))