From: Kenichi Handa Date: Thu, 7 Nov 2002 06:27:55 +0000 (+0000) Subject: Make all chararacters in the charset tibetan to tibetan script. X-Git-Tag: emacs-pretest-23.0.90~8295^2~1864^2~170 X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=cdfc5141c979e600cb76fece648c06e07f7a995a;p=emacs.git Make all chararacters in the charset tibetan to tibetan script. --- diff --git a/lisp/international/characters.el b/lisp/international/characters.el index c1927b0d3ba..b1f15dfe01a 100644 --- a/lisp/international/characters.el +++ b/lisp/international/characters.el @@ -937,6 +937,11 @@ (setq script-list (cons (nth 2 elt) script-list)))) (set-char-table-extra-slot char-script-table 0 (nreverse script-list))) +(map-charset-chars + #'(lambda (range ignore) + (set-char-table-range char-script-table range 'tibetan)) + 'tibetan) + ;;; Setting word boundary.