Ibuffer: Mark buffers by content

[gnu-emacs] / lisp / international / kinsoku.el

diff --git a/lisp/international/kinsoku.el b/lisp/international/kinsoku.el
index d07a275294eaa2697aec75c5e155e123bf59c223..f5824d486bffbf3327b0bb1a84a1be017b987183 100644 (file)
--- a/lisp/international/kinsoku.el
+++ b/lisp/international/kinsoku.el
@@ -1,9 +1,8 @@
 ;;; kinsoku.el --- `Kinsoku' processing funcs -*- coding: iso-2022-7bit; -*-
 
-;; Copyright (C) 1997, 2001, 2002, 2003, 2004, 2005, 2006, 2007, 2008
-;;   Free Software Foundation, Inc.
+;; Copyright (C) 1997, 2001-2016 Free Software Foundation, Inc.
 ;; Copyright (C) 1995, 1996, 1997, 1998, 1999, 2000, 2001, 2002, 2003, 2004,
-;;   2005, 2006, 2007, 2008
+;;   2005, 2006, 2007, 2008, 2009, 2010, 2011
 ;;   National Institute of Advanced Industrial Science and Technology (AIST)
 ;;   Registration Number H14PRO021
 
@@ -105,10 +104,10 @@ The value 0 means there's no limitation.")
         ;; JISX0201 Katakana
         "\e(I"\e(B"
         ;; Japanese JISX0208
-        "\e$B!F!H!J!L!N!P!R!T!V!X!Z!k!l!m!n!w!x\e(B\
-\e$A!.!0#"#(!2!4!6!8!:!<!>!c!d!e#@!f!l\e(B"
+        "\e$B!F!H!J!L!N!P!R!T!V!X!Z!k!l!m!n!w!x\e(B"
         ;; Chinese GB2312
-        "\e$A(E(F(G(H(I(J(K(L(M(N(O(P(Q(R(S(T(U(V(W(X(Y(h\e(B\
+         "\e$A!.!0#"#(!2!4!6!8!:!<!>!c!d!e#@!f!l\e(B\
+\e$A(E(F(G(H(I(J(K(L(M(N(O(P(Q(R(S(T(U(V(W(X(Y(h\e(B\
 \\e$(0!>!@!B!D!F!H!J!L!N!P!R!T!V!X!Z!\!^!`!b\e(B"
         ;; Chinese BIG5
         "\e$(0!d!f!h!j!k!q!p"i"j"k"n"x$u$v$w$x$y$z${\e(B\
@@ -183,5 +182,4 @@ the context of text formatting."
              (aref (char-category-set (preceding-char)) ?<))
          (kinsoku-shorter linebeg))))
 
-;; arch-tag: e6b036bc-9e5b-4e9f-a22c-4ed04e37777e
 ;;; kinsoku.el ends here