changeset 49268:7d1c850ef43a

Set up tables for 8859-6.
author Dave Love <fx@gnu.org>
date Wed, 15 Jan 2003 17:50:12 +0000
parents cc4646701e99
children af7779883f3b
files lisp/international/ucs-tables.el
diffstat 1 files changed, 1 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/international/ucs-tables.el	Wed Jan 15 17:49:32 2003 +0000
+++ b/lisp/international/ucs-tables.el	Wed Jan 15 17:50:12 2003 +0000
@@ -1111,7 +1111,7 @@
 
   ;; Derive tables that can be used as per-coding-system
   ;; `translation-table-for-encode's.
-  (dolist (n (list 15 14 9 8 7 5 4 3 2 1))
+  (dolist (n (list 15 14 9 8 7 6 5 4 3 2 1))
     (let* ((alist (symbol-value (intern (format "ucs-8859-%d-alist" n))))
 	   (encode-translator (set (intern (format "ucs-8859-%d-encode-table"
 						   n))