(next-word-boundary-han): Don't

treat katakana following han characters as a part of a word.

diff --git a/lisp/international/characters.el b/lisp/international/characters.el
index 9b1ec704a01b885fa51f4a2b4ec73948cca465ca..18d833f2733a2748192fabdfc28b136b1318ea46 100644 (file)
--- a/lisp/international/characters.el
+++ b/lisp/international/characters.el
@@ -961,7 +961,7 @@
        (goto-char pos)
        (looking-at "\\cC+")
        (goto-char (match-end 0))
-       (if (looking-at "\\cK+\\|\\cH+")
+       (if (looking-at "\\cH+")
            (goto-char (match-end 0)))
        (point))
     (while (and (> pos limit)