Mercurial > emacs
changeset 89136:6830996632b2
Bind set-case-syntax-charset to iso-8859-14. Never provide latin-8.
| author | Kenichi Handa <handa@m17n.org> |
|---|---|
| date | Tue, 01 Oct 2002 01:32:27 +0000 |
| parents | 46f96c79f150 |
| children | eab9038a8e03 |
| files | lisp/international/latin-8.el |
| diffstat | 1 files changed, 2 insertions(+), 6 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/international/latin-8.el Tue Oct 01 01:32:05 2002 +0000 +++ b/lisp/international/latin-8.el Tue Oct 01 01:32:27 2002 +0000 @@ -42,7 +42,8 @@ (require 'case-table) -(let ((tbl (standard-case-table))) +(let ((tbl (standard-case-table)) + (set-case-syntax-charset 'iso-8859-14)) (set-case-syntax-pair 161 162 tbl) ;latin letter b with dot above * (set-case-syntax 163 "w" tbl) ;pound sign (set-case-syntax-pair 164 165 tbl) ;latin letter c with dot above * @@ -95,11 +96,6 @@ (set-case-syntax-pair 222 254 tbl) ;latin letter y with circumflex * (set-case-syntax 223 "w" tbl)) ;latin small letter sharp s -;; 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-8)) - ;;; Don't compile this file: src/Makefile.in instructs make-docfile ;;; to look at the .el file! ;;; Local Variables: