[Emacs-diffs] Changes to emacs/lisp/international/characters.el [lexbind]

[Miles Bader]

Index: emacs/lisp/international/characters.el
diff -c emacs/lisp/international/characters.el:1.35.4.2 
emacs/lisp/international/characters.el:1.35.4.3
*** emacs/lisp/international/characters.el:1.35.4.2     Tue Oct 14 19:39:22 2003
--- emacs/lisp/international/characters.el      Thu Nov 20 19:36:07 2003
***************
*** 1089,1099 ****
    (setq c #x2000)
    (while (<= c #x200b)
      (set-case-syntax (decode-char 'ucs c) " " tbl)
!     (setq c (decode-char 'ucs (1+ c))))
    (setq c #x2010)
    (while (<= c #x2027)
      (set-case-syntax (decode-char 'ucs c) "_" tbl)
!     (setq c (decode-char 'ucs (1+ c))))
  
    ;; Roman numerals
    (setq c #x2160)
--- 1089,1106 ----
    (setq c #x2000)
    (while (<= c #x200b)
      (set-case-syntax (decode-char 'ucs c) " " tbl)
!     (setq c (1+ c)))
    (setq c #x2010)
+   (while (<= c #x2016)
+     (set-case-syntax (decode-char 'ucs c) "_" tbl)
+     (setq c (1+ c)))
+   ;; Punctuation syntax for quotation marks (like `)
+   (while (<= c #x201f)
+     (set-case-syntax (decode-char 'ucs c) "." tbl)
+     (setq c (1+ c)))
    (while (<= c #x2027)
      (set-case-syntax (decode-char 'ucs c) "_" tbl)
!     (setq c (1+ c)))
  
    ;; Roman numerals
    (setq c #x2160)