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

[Kenichi Handa]

Index: emacs/lisp/international/kinsoku.el
diff -c emacs/lisp/international/kinsoku.el:1.14 
emacs/lisp/international/kinsoku.el:1.15
*** emacs/lisp/international/kinsoku.el:1.14    Mon Jul  4 17:22:27 2005
--- emacs/lisp/international/kinsoku.el Tue Dec  6 06:23:54 2005
***************
*** 109,115 ****
  $A!.!0#"#(!2!4!6!8!:!<!>address@hidden(B"
         ;; Chinese GB2312
         "$A(E(F(G(H(I(J(K(L(M(N(O(P(Q(R(S(T(U(V(W(X(Y(h(B\
! $(0!>address@hidden(B"
         ;; Chinese BIG5
         "$(0!d!f!h!j!k!q!p"i"j"k"n"x$u$v$w$x$y$z${(B\
  $(0$|$}$~%!%"%#%$%%%&%'%(%)%*%+%:(B"))
--- 109,115 ----
  $A!.!0#"#(!2!4!6!8!:!<!>address@hidden(B"
         ;; Chinese GB2312
         "$A(E(F(G(H(I(J(K(L(M(N(O(P(Q(R(S(T(U(V(W(X(Y(h(B\
! \$(0!>address@hidden(B"
         ;; Chinese BIG5
         "$(0!d!f!h!j!k!q!p"i"j"k"n"x$u$v$w$x$y$z${(B\
  $(0$|$}$~%!%"%#%$%%%&%'%(%)%*%+%:(B"))
***************
*** 126,132 ****
    (let ((pos-and-column
         (save-excursion
           (forward-char 1)
!          (while (and (not (eobp))
                       (or (aref (char-category-set (following-char)) ?>)
                           ;; protect non-kinsoku words
                           (not (or (eq (preceding-char) ? )
--- 126,132 ----
    (let ((pos-and-column
         (save-excursion
           (forward-char 1)
!          (while (and (not (eolp))
                       (or (aref (char-category-set (following-char)) ?>)
                           ;; protect non-kinsoku words
                           (not (or (eq (preceding-char) ? )