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

[Miles Bader]

Index: emacs/lisp/international/characters.el
diff -c emacs/lisp/international/characters.el:1.35 
emacs/lisp/international/characters.el:1.36
*** emacs/lisp/international/characters.el:1.35 Wed Dec 12 17:47:58 2001
--- emacs/lisp/international/characters.el      Wed Jun 19 21:02:47 2002
***************
*** 2,8 ****
  
  ;; Copyright (C) 1995, 1997 Electrotechnical Laboratory, JAPAN.
  ;; Licensed to the Free Software Foundation.
! ;; Copyright (C) 2001 Free Software Foundation, Inc.
  
  ;; Keywords: multibyte character, character set, syntax, category
  
--- 2,8 ----
  
  ;; Copyright (C) 1995, 1997 Electrotechnical Laboratory, JAPAN.
  ;; Licensed to the Free Software Foundation.
! ;; Copyright (C) 2001, 2002 Free Software Foundation, Inc.
  
  ;; Keywords: multibyte character, character set, syntax, category
  
***************
*** 574,583 ****
  (modify-syntax-entry (make-char 'japanese-jisx0208 33) "_")
  (modify-syntax-entry (make-char 'japanese-jisx0208 34) "_")
  (modify-syntax-entry (make-char 'japanese-jisx0208 40) "_")
! ;; (let ((chars '(?$B!<(B ?$B!+(B ?$B!,(B ?$B!3(B ?$B!4(B ?$B!5(B 
?$B!6(B ?$B!7(B ?$B!8(B ?$B!9(B ?$B!:(B ?$B!;(B)))
! ;;   (while chars
! ;;     (modify-syntax-entry (car chars) "w")
! ;;     (setq chars (cdr chars))))
  (modify-syntax-entry ?\$B!J(B "($B!K(B")
  (modify-syntax-entry ?\$B!N(B "($B!O(B")
  (modify-syntax-entry ?\$B!P(B "($B!Q(B")
--- 574,583 ----
  (modify-syntax-entry (make-char 'japanese-jisx0208 33) "_")
  (modify-syntax-entry (make-char 'japanese-jisx0208 34) "_")
  (modify-syntax-entry (make-char 'japanese-jisx0208 40) "_")
! (let ((chars '(?$B!<(B ?$B!+(B ?$B!,(B ?$B!3(B ?$B!4(B ?$B!5(B 
?$B!6(B ?$B!7(B ?$B!8(B ?$B!9(B ?$B!:(B ?$B!;(B)))
!   (while chars
!     (modify-syntax-entry (car chars) "w")
!     (setq chars (cdr chars))))
  (modify-syntax-entry ?\$B!J(B "($B!K(B")
  (modify-syntax-entry ?\$B!N(B "($B!O(B")
  (modify-syntax-entry ?\$B!P(B "($B!Q(B")