;;; latin-1.el --- set up case-conversion and syntax tables for ISO Latin-1
-;; Copyright (C) 1988,1997 Free Software Foundation, Inc.
+;; Copyright (C) 1988, 1997, 2001, 2002, 2003, 2004, 2005, 2006, 2007
+;; Free Software Foundation, Inc.
;; Author: Howard Gayle
;; Maintainer: FSF
;; You should have received a copy of the GNU General Public License
;; along with GNU Emacs; see the file COPYING. If not, write to the
-;; Free Software Foundation, Inc., 59 Temple Place - Suite 330,
-;; Boston, MA 02111-1307, USA.
+;; Free Software Foundation, Inc., 51 Franklin Street, Fifth Floor,
+;; Boston, MA 02110-1301, USA.
;;; Commentary:
;; Written by Howard Gayle. See case-table.el for details.
;; Updated by Erik Naggum.
+;; The current standard is ISO/IEC 8859-1:1998. As of 1999-05, see
+;; <URL:http://czyborra.com/charsets/iso8859.html> and the `final text'
+;; <URL:http://anubis.dkuug.dk/jtc1/sc2/wg3/docs/n411.pdf>.
;;; Code:
(require 'case-table)
(if set-case-syntax-set-multibyte
(- (make-char 'latin-iso8859-1) 128)
0)))
- (set-case-syntax 160 " " tbl) ;no-break space
+ ;; NBSP isn't semantically interchangeable with other whitespace chars,
+ ;; so it's more like punctation.
+ (set-case-syntax 160 "." tbl) ;no-break space
(set-case-syntax 161 "." tbl) ;inverted exclamation mark
(set-case-syntax 162 "w" tbl) ;cent sign
(set-case-syntax 163 "w" tbl) ;pound sign
(set-case-syntax 172 "_" tbl) ;not sign
(set-case-syntax 173 "_" tbl) ;soft hyphen
(set-case-syntax 174 "_" tbl) ;registered sign
- (set-case-syntax 175 "w" tbl) ;overline
+ (set-case-syntax 175 "w" tbl) ;macron
(set-case-syntax 176 "_" tbl) ;degree sign
(set-case-syntax 177 "_" tbl) ;plus-minus sign
- (set-case-syntax 178 "w" tbl) ;superscript digit two
- (set-case-syntax 179 "w" tbl) ;superscript digit three
+ (set-case-syntax 178 "w" tbl) ;superscript two
+ (set-case-syntax 179 "w" tbl) ;superscript three
(set-case-syntax 180 "w" tbl) ;acute accent
(set-case-syntax 181 "_" tbl) ;micro sign
(set-case-syntax 182 "w" tbl) ;pilcrow sign
(set-case-syntax 183 "_" tbl) ;middle dot
(set-case-syntax 184 "w" tbl) ;cedilla
- (set-case-syntax 185 "w" tbl) ;superscript digit one
+ (set-case-syntax 185 "w" tbl) ;superscript one
(set-case-syntax 186 "w" tbl) ;masculine ordinal indicator
(set-case-syntax 188 "_" tbl) ;vulgar fraction one quarter
(set-case-syntax 189 "_" tbl) ;vulgar fraction one half
(set-case-syntax-pair 205 237 tbl) ;latin letter i with acute
(set-case-syntax-pair 206 238 tbl) ;latin letter i with circumflex
(set-case-syntax-pair 207 239 tbl) ;latin letter i with diaeresis
- (set-case-syntax-pair 208 240 tbl) ;latin letter eth
+ (set-case-syntax-pair 208 240 tbl) ;latin letter eth (Icelandic)
(set-case-syntax-pair 209 241 tbl) ;latin letter n with tilde
(set-case-syntax-pair 210 242 tbl) ;latin letter o with grave
(set-case-syntax-pair 211 243 tbl) ;latin letter o with acute
(set-case-syntax-pair 219 251 tbl) ;latin letter u with circumflex
(set-case-syntax-pair 220 252 tbl) ;latin letter u with diaeresis
(set-case-syntax-pair 221 253 tbl) ;latin letter y with acute
- (set-case-syntax-pair 222 254 tbl) ;latin letter thorn
- (set-case-syntax 223 "w" tbl) ;latin small letter sharp s
+ (set-case-syntax-pair 222 254 tbl) ;latin letter thorn (Icelandic)
+ (set-case-syntax 223 "w" tbl) ;latin small letter sharp s (German)
(set-case-syntax 247 "_" tbl) ;division sign
- (set-case-syntax 255 "w" tbl)) ;latin small letter y with diaeresis
+ ;; The following setting should be suppressed when we are loading
+ ;; this file for setting syntax of multibyte characters.
+ (or set-case-syntax-set-multibyte
+ (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-1))
+;; Don't compile this file: src/Makefile.in instructs make-docfile
+;; to look at the .el file!
+;; Local Variables:
+;; no-byte-compile: t
+;; End:
+
+;; arch-tag: c2ee6895-edc3-40b2-9518-8c09f1d56c54
;;; latin-1.el ends here