# HG changeset patch # User Kenichi Handa # Date 1033435869 0 # Node ID 5d8eee263d395bf5be8341d9d38063268afd4bce # Parent 13bec264e34527cd1a11fe280c1edb903e15a3fa Bind set-case-syntax-charset to iso-8859-2. Never provide latin-2. diff -r 13bec264e345 -r 5d8eee263d39 lisp/international/latin-2.el --- a/lisp/international/latin-2.el Tue Oct 01 01:30:52 2002 +0000 +++ b/lisp/international/latin-2.el Tue Oct 01 01:31:09 2002 +0000 @@ -33,7 +33,8 @@ (require 'case-table) -(let ((tbl (standard-case-table))) +(let ((tbl (standard-case-table)) + (set-case-syntax-charset 'iso-8859-2)) (set-case-syntax 160 " " tbl) ;no-break space (set-case-syntax-pair 161 177 tbl) ;latin letter a with ogonek (set-case-syntax 162 "w" tbl) ;breve @@ -91,11 +92,6 @@ (set-case-syntax 247 "_" tbl) ;division sign (set-case-syntax 255 "w" tbl)) ;dot above -;; 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-2)) - ;;; Don't compile this file: src/Makefile.in instructs make-docfile ;;; to look at the .el file! ;;; Local Variables: