/[emacs]/emacs/lisp/international/latin-2.el
ViewVC logotype

Diff of /emacs/lisp/international/latin-2.el

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.8 by miles, Mon Sep 1 15:45:28 2003 UTC revision 1.9 by monnier, Sun Apr 10 20:49:53 2005 UTC
# Line 1  Line 1 
1  ;;; latin-2.el --- set up case-conversion and syntax tables for ISO Latin-2  ;;; latin-2.el --- set up case-conversion and syntax tables for ISO Latin-2
2    
3  ;; Copyright (C) 1995,1997 Free Software Foundation, Inc.  ;; Copyright (C) 1995, 1997, 2005  Free Software Foundation, Inc.
4    
5  ;; Author: Michael Gschwind (mike@vlsivie.tuwien.ac.at)  ;; Author: Michael Gschwind (mike@vlsivie.tuwien.ac.at)
6  ;; Maintainer: FSF  ;; Maintainer: FSF
# Line 38  Line 38 
38         (if set-case-syntax-set-multibyte         (if set-case-syntax-set-multibyte
39             (- (make-char 'latin-iso8859-2) 128)             (- (make-char 'latin-iso8859-2) 128)
40           0)))           0)))
41    (set-case-syntax 160 " " tbl)         ;no-break space    ;; NBSP isn't semantically interchangeable with other whitespace chars,
42      ;; so it's more like punctation.
43      (set-case-syntax 160 "." tbl)         ;no-break space
44    (set-case-syntax-pair 161 177 tbl)    ;latin letter a with ogonek    (set-case-syntax-pair 161 177 tbl)    ;latin letter a with ogonek
45    (set-case-syntax 162 "w" tbl)         ;breve    (set-case-syntax 162 "w" tbl)         ;breve
46    (set-case-syntax-pair 163 179 tbl)    ;latin letter l with stroke    (set-case-syntax-pair 163 179 tbl)    ;latin letter l with stroke
# Line 100  Line 102 
102  (or set-case-syntax-set-multibyte  (or set-case-syntax-set-multibyte
103      (provide 'latin-2))      (provide 'latin-2))
104    
105  ;;; Don't compile this file: src/Makefile.in instructs make-docfile  ;; Don't compile this file: src/Makefile.in instructs make-docfile
106  ;;; to look at the .el file!  ;; to look at the .el file!
107  ;;; Local Variables:  ;; Local Variables:
108  ;;; no-byte-compile: t  ;; no-byte-compile: t
109  ;;; End:  ;; End:
110    
111  ;;; arch-tag: 2b9f9c30-1a63-4877-8a80-e95a5e4c57c9  ;; arch-tag: 2b9f9c30-1a63-4877-8a80-e95a5e4c57c9
112  ;;; latin-2.el ends here  ;;; latin-2.el ends here

Legend:
Removed from v.1.8  
changed lines
  Added in v.1.9

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26