Give punctuation syntax to NBSP.

8 files changed, 85 insertions, 55 deletions

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 3ab0e9f1b51..d38b0ce8e49 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,18 @@
+2005-04-10  Stefan Monnier  <monnier@iro.umontreal.ca>
+
+        * international/latin-1.el:
+        * international/latin-2.el:
+        * international/latin-3.el:
+        * international/latin-4.el:
+        * international/latin-5.el:
+        * international/latin-8.el:
+        * international/latin-9.el: Give punctuation syntax to NBSP.
+
+        * textmodes/bibtex.el (bibtex-autokey-titleword-ignore)
+        (bibtex-reference-key, bibtex-autokey-demangle-name, bibtex-mode):
+        Use char-classes to accept non-ascii letters, accepted in some recent
+        bibtex implementations.
+
 2005-04-10  Luc Teirlinck  <teirllm@auburn.edu>
 
         * custom.el (custom-set-minor-mode): Any non-nil value for the
diff --git a/lisp/international/latin-1.el b/lisp/international/latin-1.el
index 610ed1cb9f1..454e4eab1ce 100644
--- a/lisp/international/latin-1.el
+++ b/lisp/international/latin-1.el
@@ -1,6 +1,6 @@
 ;;; 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, 2005 Free Software Foundation, Inc.
 
 ;; Author: Howard Gayle
 ;; Maintainer: FSF
@@ -40,7 +40,9 @@
        (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
@@ -114,11 +116,11 @@
 (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:
+;; 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
+;; arch-tag: c2ee6895-edc3-40b2-9518-8c09f1d56c54
 ;;; latin-1.el ends here
diff --git a/lisp/international/latin-2.el b/lisp/international/latin-2.el
index bc7fbe84274..704145f5e58 100644
--- a/lisp/international/latin-2.el
+++ b/lisp/international/latin-2.el
@@ -1,6 +1,6 @@
 ;;; latin-2.el --- set up case-conversion and syntax tables for ISO Latin-2
 
-;; Copyright (C) 1995,1997 Free Software Foundation, Inc.
+;; Copyright (C) 1995, 1997, 2005  Free Software Foundation, Inc.
 
 ;; Author: Michael Gschwind (mike@vlsivie.tuwien.ac.at)
 ;; Maintainer: FSF
@@ -38,7 +38,9 @@
        (if set-case-syntax-set-multibyte
            (- (make-char 'latin-iso8859-2) 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-pair 161 177 tbl)    ;latin letter a with ogonek
   (set-case-syntax 162 "w" tbl)         ;breve
   (set-case-syntax-pair 163 179 tbl)    ;latin letter l with stroke
@@ -100,11 +102,11 @@
 (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:
-;;; no-byte-compile: t
-;;; End:
+;; 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: 2b9f9c30-1a63-4877-8a80-e95a5e4c57c9
+;; arch-tag: 2b9f9c30-1a63-4877-8a80-e95a5e4c57c9
 ;;; latin-2.el ends here
diff --git a/lisp/international/latin-3.el b/lisp/international/latin-3.el
index 99debf3983d..b87336b9c72 100644
--- a/lisp/international/latin-3.el
+++ b/lisp/international/latin-3.el
@@ -1,6 +1,6 @@
 ;;; latin-3.el --- set up case-conversion and syntax tables for ISO Latin-3
 
-;; Copyright (C) 1988,1997 Free Software Foundation, Inc.
+;; Copyright (C) 1988, 1997, 2005  Free Software Foundation, Inc.
 
 ;; Author: Marko Rahamaa
 ;; Maintainer: FSF
@@ -37,7 +37,9 @@
        (if set-case-syntax-set-multibyte
            (- (make-char 'latin-iso8859-3) 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-pair 161 177 tbl)    ;latin letter h with stroke
   (set-case-syntax 162 "w" tbl)         ;breve
   (set-case-syntax 163 "w" tbl)         ;pound sign
@@ -98,11 +100,11 @@
 (or set-case-syntax-set-multibyte
     (provide 'latin-3))
 
-;;; Don't compile this file: src/Makefile.in instructs make-docfile
-;;; to look at the .el file!
-;;; Local Variables:
-;;; no-byte-compile: t
-;;; End:
+;; 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: 64d9d46d-fe0b-4a8e-9c28-ba7e20bbc552
+;; arch-tag: 64d9d46d-fe0b-4a8e-9c28-ba7e20bbc552
 ;;; latin-3.el ends here
diff --git a/lisp/international/latin-4.el b/lisp/international/latin-4.el
index 7fa901dba0b..a6aeae736eb 100644
--- a/lisp/international/latin-4.el
+++ b/lisp/international/latin-4.el
@@ -1,6 +1,6 @@
 ;;; latin-4.el --- set up case-conversion and syntax tables for ISO Latin-4
 
-;; Copyright (C) 1997 Free Software Foundation, Inc.
+;; Copyright (C) 1997, 2005  Free Software Foundation, Inc.
 
 ;; Author: Erik Naggum
 ;; Maintainer: FSF
@@ -36,7 +36,9 @@
        (if set-case-syntax-set-multibyte
            (- (make-char 'latin-iso8859-4) 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-pair 161 177 tbl)    ;latin letter a with ogonek
   (set-case-syntax 162 "w" tbl)         ;latin letter kra
   (set-case-syntax-pair 163 179 tbl)    ;latin letter r with cedilla
@@ -98,11 +100,11 @@
 (or set-case-syntax-set-multibyte
     (provide 'latin-4))
 
-;;; Don't compile this file: src/Makefile.in instructs make-docfile
-;;; to look at the .el file!
-;;; Local Variables:
-;;; no-byte-compile: t
-;;; End:
+;; 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: c6b2558b-1943-4626-beb5-139630c8e352
+;; arch-tag: c6b2558b-1943-4626-beb5-139630c8e352
 ;;; latin-4.el ends here
diff --git a/lisp/international/latin-5.el b/lisp/international/latin-5.el
index 5d96c1132a7..cc971ecbb86 100644
--- a/lisp/international/latin-5.el
+++ b/lisp/international/latin-5.el
@@ -1,6 +1,6 @@
 ;;; latin-5.el --- set up case-conversion and syntax tables for ISO latin-5
 
-;; Copyright (C) 1997 Free Software Foundation, Inc.
+;; Copyright (C) 1997, 2005  Free Software Foundation, Inc.
 
 ;; Author: Erik Naggum
 ;; Maintainer: FSF
@@ -36,7 +36,9 @@
        (if set-case-syntax-set-multibyte
            (- (make-char 'latin-iso8859-9) 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
@@ -111,11 +113,11 @@
 (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:
-;;; no-byte-compile: t
-;;; End:
+;; 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: 7f91a36a-39fb-4b5d-806f-f171abee71ad
+;; arch-tag: 7f91a36a-39fb-4b5d-806f-f171abee71ad
 ;;; latin-5.el ends here
diff --git a/lisp/international/latin-8.el b/lisp/international/latin-8.el
index 91ea40198db..092ea8ab874 100644
--- a/lisp/international/latin-8.el
+++ b/lisp/international/latin-8.el
@@ -1,6 +1,6 @@
 ;;; latin-8.el --- set up case-conversion and syntax tables for ISO Latin-8
 
-;; Copyright (C) 1988,1997, 1999 Free Software Foundation, Inc.
+;; Copyright (C) 1988, 1997, 1999, 2005 Free Software Foundation, Inc.
 
 ;; Author: Dave Love
 ;; Maintainer: FSF
@@ -47,6 +47,9 @@
        (if set-case-syntax-set-multibyte
            (- (make-char 'latin-iso8859-14) 128)
          0)))
+  ;; 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-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 *
@@ -104,11 +107,11 @@
 (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:
-;;; no-byte-compile: t
-;;; End:
+;; 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: a916b4b5-4204-485b-8b57-8ab3a43a2e29
+;; arch-tag: a916b4b5-4204-485b-8b57-8ab3a43a2e29
 ;;; latin-8.el ends here
diff --git a/lisp/international/latin-9.el b/lisp/international/latin-9.el
index 1a221f024de..be568c3115c 100644
--- a/lisp/international/latin-9.el
+++ b/lisp/international/latin-9.el
@@ -1,6 +1,6 @@
 ;;; latin-9.el --- set up case-conversion and syntax tables for ISO Latin-9
 
-;; Copyright (C) 1988,1997,1999 Free Software Foundation, Inc.
+;; Copyright (C) 1988, 1997, 1999, 2005 Free Software Foundation, Inc.
 
 ;; Author: Dave Love
 ;; Maintainer: FSF
@@ -50,7 +50,9 @@
        (if set-case-syntax-set-multibyte
            (- (make-char 'latin-iso8859-15) 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
@@ -117,11 +119,11 @@
 (or set-case-syntax-set-multibyte
     (provide 'latin-9))
 
-;;; Don't compile this file: src/Makefile.in instructs make-docfile
-;;; to look at the .el file!
-;;; Local Variables:
-;;; no-byte-compile: t
-;;; End:
+;; 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: 84d442ad-d595-4016-8b84-ea92704fd235
+;; arch-tag: 84d442ad-d595-4016-8b84-ea92704fd235
 ;;; latin-9.el ends here