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

[Miles Bader]

Index: emacs/lisp/international/subst-jis.el
diff -c emacs/lisp/international/subst-jis.el:1.1.4.1 
emacs/lisp/international/subst-jis.el:1.1.4.2
*** emacs/lisp/international/subst-jis.el:1.1.4.1       Fri Apr  4 01:20:22 2003
--- emacs/lisp/international/subst-jis.el       Tue Oct 14 19:39:23 2003
***************
*** 47,53 ****
     (let ((unicode (car pair))
         (char (cadr pair)))
       ;; exclude non-CJK components from decode table
!      (if (and (>= unicode #x2e80) (<= unicode #xd7a3))
         (puthash unicode  char ucs-unicode-to-mule-cjk))
       (puthash char unicode ucs-mule-cjk-to-unicode)))
   '(
--- 47,54 ----
     (let ((unicode (car pair))
         (char (cadr pair)))
       ;; exclude non-CJK components from decode table
!      (if (or (and (>= unicode #x2e80) (<= unicode #xd7a3))
!            (and (>= unicode #xff00) (<= unicode #xffef)))
         (puthash unicode  char ucs-unicode-to-mule-cjk))
       (puthash char unicode ucs-mule-cjk-to-unicode)))
   '(
***************
*** 13002,13005 ****
--- 13003,13007 ----
     (#x9fa5 ?íã)
     (#xff5e ?¢·)))
  
+ ;;; arch-tag: 7f320453-b293-4159-af5e-6f0bab03048c
  ;;; subst-jis.el ends here