Mercurial > emacs

comparison lisp/international/latin-5.el @ 18233:c1e30dd29cb1

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Latin-5 is ISO-8859-9, not ISO-8859-5.
author Richard M. Stallman <rms@gnu.org>
date Fri, 13 Jun 1997 00:51:01 +0000
parents f8af1810653b
children f630f8658de3
comparison
equal deleted inserted replaced
18232:4183933733e6 18233:c1e30dd29cb1
32 (require 'case-table) 32 (require 'case-table)
33 33
34 (let ((tbl (standard-case-table)) 34 (let ((tbl (standard-case-table))
35 (set-case-syntax-offset 35 (set-case-syntax-offset
36 (if set-case-syntax-set-multibyte 36 (if set-case-syntax-set-multibyte
37 (- (make-char 'latin-iso8859-5) 128) 37 (- (make-char 'latin-iso8859-9) 128)
38 0))) 38 0)))
39 (set-case-syntax 160 " " tbl) ;no-break space 39 (set-case-syntax 160 " " tbl) ;no-break space
40 (set-case-syntax 161 "." tbl) ;inverted exclamation mark 40 (set-case-syntax 161 "." tbl) ;inverted exclamation mark
41 (set-case-syntax 162 "w" tbl) ;cent sign 41 (set-case-syntax 162 "w" tbl) ;cent sign
42 (set-case-syntax 163 "w" tbl) ;pound sign 42 (set-case-syntax 163 "w" tbl) ;pound sign