Mercurial > emacs

changeset 48765:7fbdce538f4a

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Fix last change.
author Andreas Schwab <schwab@suse.de>
date Mon, 09 Dec 2002 15:55:23 +0000
parents 4a69081f2ff4
children c413ffa94be5
files lisp/international/ucs-tables.el
diffstat 1 files changed, 8 insertions(+), 7 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/international/ucs-tables.el	Mon Dec 09 10:44:25 2002 +0000
+++ b/lisp/international/ucs-tables.el	Mon Dec 09 15:55:23 2002 +0000
@@ -2416,14 +2416,15 @@
 	 (?(1x(B . ?$,1Dx(B)
 	 (?(1y(B . ?$,1Dy(B)
 	 (?(1|(B . ?$,1D|(B)
-	 (?(1}(B . ?$,1D}(B))
+	 (?(1}(B . ?$,1D}(B)))
        
-       (other
-	;; latin-jisx0201 is mostly decoded to ascii, with these
-	;; exceptions, so we don't bother with tables for the whole
-	;; thing.
-	(?(J\(B . ?,A%(B)
-	(?(J~(B . ?$,1s>(B))))
+      (other
+       '(
+	 ;; latin-jisx0201 is mostly decoded to ascii, with these
+	 ;; exceptions, so we don't bother with tables for the whole
+	 ;; thing.
+	 (?(J\(B . ?,A%(B)
+	 (?(J~(B . ?$,1s>(B))))
   (let ((table (make-char-table 'safe-chars))
 	safe-charsets)
     (dolist (cs '(vietnamese-viscii lao chinese-sisheng ipa