From db70257e2a91ab20f392264f0b53abea40c0a6f0 Mon Sep 17 00:00:00 2001 From: Dave Love Date: Wed, 11 Sep 2002 21:00:27 +0000 Subject: [PATCH] Fix last change. --- lisp/international/ucs-tables.el | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/lisp/international/ucs-tables.el b/lisp/international/ucs-tables.el index ee78a969d9b..a56daa83511 100644 --- a/lisp/international/ucs-tables.el +++ b/lisp/international/ucs-tables.el @@ -1100,7 +1100,7 @@ Translates from the iso8859 charsets and `mule-unicode-0100-24ff'.") ;; Convert the lists to the basic char tables. ;; Ensure `decode-char' doesn't use the fragmentation table. ;; Fixme: handa suggests using the RESTRICTION arg. - (let (utf-8-translation-table-for-decode) + (let ((utf-8-translation-table-for-decode (make-translation-table))) (dolist (n (list 15 14 9 8 7 5 4 3 2 1)) (let ((alist (symbol-value (intern (format "ucs-8859-%d-alist" n))))) (dolist (pair alist)