Translate.
authorDaiki Ueno <ueno@unixuser.org>
Sun, 28 Jan 2007 03:43:00 +0000 (03:43 +0000)
committerDaiki Ueno <ueno@unixuser.org>
Sun, 28 Jan 2007 03:43:00 +0000 (03:43 +0000)
lisp/riece-button.el
lisp/riece-mcat-japanese.el

index b7f5126..27e4a73 100644 (file)
@@ -61,7 +61,7 @@
     ;; wid-edit (XEmacs only).
     (if (boundp 'help-echo-owns-message)
        (setq help-echo-owns-message t))
-    (format "%S: switch to %s; down-mouse-3: more options"
+    (format (riece-mcat "%S: switch to %s; down-mouse-3: more options")
            (aref riece-mouse-2 0)
            ;; XEmacs will get a single widget arg; Emacs 21 will get
            ;; window, overlay, position.
@@ -78,7 +78,8 @@ This function is used as a callback for a channel button."
     (if (riece-identity-member channel riece-current-channels)
        (riece-command-switch-to-channel channel)
       (message "%s" (substitute-command-keys
-                    "Type \\[riece-command-join] to join the channel")))))
+                    (riece-mcat
+                     "Type \\[riece-command-join] to join the channel"))))))
 
 (defun riece-identity-button-click (event)
   "Call widget-button-click and select the last selected window."
index 2c1a3f6..e25a89b 100644 (file)
@@ -27,7 +27,8 @@
 ;;; Code:
 
 (defconst riece-mcat-japanese-alist
-  '(("%d users on %s: " . "%d \e$B?M$,\e(B %s \e$B$K$$$^$9\e(B: ")
+  '(("%S: switch to %s; down-mouse-3: more options" . "%S: %s \e$B$K0\F0\e(B: down-mouse-3: \e$B$=$NB>$N%*%W%7%g%s\e(B")
+    ("%d users on %s: " . "%d \e$B?M$,\e(B %s \e$B$K$$$^$9\e(B: ")
     ("%d users: " . "%d \e$B?M\e(B: ")
     ("%s (%s) has joined %s" . "%s (%s) \e$B$,\e(B %s \e$B$K;22C$7$^$7$?\e(B")
     ("%s (%s) has joined %s\n" . "%s (%s) \e$B$,\e(B %s \e$B$K;22C$7$^$7$?\e(B\n")
     ("Topic on %s by %s: %s" . "%s \e$B$N%H%T%C%/$,\e(B %s \e$B$K$h$j@_Dj$5$l$^$7$?\e(B: %s")
     ("Topic: " . "\e$B%H%T%C%/\e(B: ")
     ("Type \\[describe-mode] for help" . "\e$B%X%k%W$r8+$k$K$O\e(B \\[describe-mode]")
+    ("Type \\[riece-command-join] to join the channel" . "\e$B%A%c%s%M%k$K;22C$9$k$K$O\e(B \\[riece-command-join]")
     ("Unset +o for users" . "-o \e$B$9$k%f!<%6\e(B")
     ("Unset +v for users" . "-v \e$B$9$k%f!<%6\e(B")
     ("WHO pattern: " . "WHO \e$B$N%Q%?!<%s\e(B: ")