# HG changeset patch # User Kenichi Handa # Date 1033435925 0 # Node ID 46f96c79f15067a94d662b232d8b5c3c7163fc3b # Parent b87c8091320a228c8362fdd2fc78ef7399e47e81 Bind set-case-syntax-charset to iso-8859-9. Never provide latin-5. diff -r b87c8091320a -r 46f96c79f150 lisp/international/latin-5.el --- a/lisp/international/latin-5.el Tue Oct 01 01:31:47 2002 +0000 +++ b/lisp/international/latin-5.el Tue Oct 01 01:32:05 2002 +0000 @@ -31,7 +31,8 @@ (require 'case-table) -(let ((tbl (standard-case-table))) +(let ((tbl (standard-case-table)) + (set-case-syntax-charset 'iso-8859-9)) (set-case-syntax 160 " " tbl) ;no-break space (set-case-syntax 161 "." tbl) ;inverted exclamation mark (set-case-syntax 162 "w" tbl) ;cent sign @@ -102,11 +103,6 @@ (set-case-syntax 253 "w" tbl) ;latin small letter i dotless (set-case-syntax 255 "w" tbl)) ;latin small letter y with diaeresis -;; When preloading this file, don't provide the feature. -;; Explicit `require' is used to load this for 8-bit characters. -(or set-case-syntax-set-multibyte - (provide 'latin-5)) - ;;; Don't compile this file: src/Makefile.in instructs make-docfile ;;; to look at the .el file! ;;; Local Variables: