mirror of
https://git.savannah.gnu.org/git/emacs.git
synced 2024-12-27 10:54:40 +00:00
Set category `q' for all characters
in tibetan and tibetan-1-column.
This commit is contained in:
parent
880a9ae168
commit
162308884a
@ -502,12 +502,8 @@
|
||||
|
||||
;; Tibetan character set
|
||||
|
||||
(let ((row 33))
|
||||
(while (< row 38)
|
||||
(modify-category-entry (make-char 'tibetan row) ?q)
|
||||
(setq row (1+ row))))
|
||||
|
||||
(modify-category-entry (make-char 'tibetan-1-column 33) ?q)
|
||||
(modify-category-entry (make-char 'tibetan) ?q)
|
||||
(modify-category-entry (make-char 'tibetan-1-column) ?q)
|
||||
|
||||
(let ((deflist '(;; chars syntax category
|
||||
("$(7"!(B-$(7"J(B" "w" ?0) ; consonant
|
||||
|
Loading…
Reference in New Issue
Block a user