Mercurial > emacs
comparison lisp/international/characters.el @ 85154:e12e16dc9c24
Undo unwanted and unexplained change.
author | Stefan Monnier <monnier@iro.umontreal.ca> |
---|---|
date | Thu, 11 Oct 2007 01:46:40 +0000 |
parents | d1ea5efb14f2 |
children | 107ccd98fa12 |
comparison
equal
deleted
inserted
replaced
85153:c3969e15712b | 85154:e12e16dc9c24 |
---|---|
838 (modify-category-entry (make-char 'tibetan-1-column) ?q) | 838 (modify-category-entry (make-char 'tibetan-1-column) ?q) |
839 (dotimes (i (1+ (- #xfff #xf00))) | 839 (dotimes (i (1+ (- #xfff #xf00))) |
840 (modify-category-entry (decode-char 'ucs (+ i #xf00)) ?q)) | 840 (modify-category-entry (decode-char 'ucs (+ i #xf00)) ?q)) |
841 | 841 |
842 (let ((deflist '(;; chars syntax category | 842 (let ((deflist '(;; chars syntax category |
843 ("4$(7"!(B0$(7"!(B1-4$(7"J(B0$(7"J(B14$(7"K(B0$(7"K(B1" "w" ?0) ; consonant | 843 ("4$(7"!0"!1(B-4$(7"J0"J14"K0"K1(B" "w" ?0) ; consonant |
844 ("$(7#!(B-$(7#J#K#L#M!"!#(B" "w" ?0) ; | 844 ("$(7#!(B-$(7#J#K#L#M!"!#(B" "w" ?0) ; |
845 ("$(7$!(B-$(7$e(B" "w" ?0) ; | 845 ("$(7$!(B-$(7$e(B" "w" ?0) ; |
846 ("$(7%!(B-$(7%u(B" "w" ?0) ; | 846 ("$(7%!(B-$(7%u(B" "w" ?0) ; |
847 ("$(7"S"["\"]"^"a(B" "w" ?2) ; upper vowel | 847 ("$(7"S"["\"]"^"a(B" "w" ?2) ; upper vowel |
848 ("$(7"_"c"d"g"h"i"j"k"l(B" "w" ?2) ; upper modifier | 848 ("$(7"_"c"d"g"h"i"j"k"l(B" "w" ?2) ; upper modifier |