Bind set-case-syntax-charset to iso-8859-9. Never provide latin-5.

diff --git a/lisp/international/latin-5.el b/lisp/international/latin-5.el
index 6f65b53018762b3f23282b25044ac82f279d57a3..4b09fad434f55d1da71d076ba0fef758c2569c8d 100644 (file)
--- a/lisp/international/latin-5.el
+++ b/lisp/international/latin-5.el
@@ -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: