From: ueno Date: Sun, 28 Jan 2007 03:43:00 +0000 (+0000) Subject: Translate. X-Git-Tag: riece-3_1_2~18 X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=1cd722c3510cf125532de4645bbc818bd98836cb;p=elisp%2Friece.git Translate. --- diff --git a/lisp/riece-button.el b/lisp/riece-button.el index b7f5126..27e4a73 100644 --- a/lisp/riece-button.el +++ b/lisp/riece-button.el @@ -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." diff --git a/lisp/riece-mcat-japanese.el b/lisp/riece-mcat-japanese.el index 2c1a3f6..e25a89b 100644 --- a/lisp/riece-mcat-japanese.el +++ b/lisp/riece-mcat-japanese.el @@ -27,7 +27,8 @@ ;;; Code: (defconst riece-mcat-japanese-alist - '(("%d users on %s: " . "%d 人が %s にいます: ") + '(("%S: switch to %s; down-mouse-3: more options" . "%S: %s に移動: down-mouse-3: その他のオプション") + ("%d users on %s: " . "%d 人が %s にいます: ") ("%d users: " . "%d 人: ") ("%s (%s) has joined %s" . "%s (%s) が %s に参加しました") ("%s (%s) has joined %s\n" . "%s (%s) が %s に参加しました\n") @@ -118,6 +119,7 @@ ("Topic on %s by %s: %s" . "%s のトピックが %s により設定されました: %s") ("Topic: " . "トピック: ") ("Type \\[describe-mode] for help" . "ヘルプを見るには \\[describe-mode]") + ("Type \\[riece-command-join] to join the channel" . "チャンネルに参加するには \\[riece-command-join]") ("Unset +o for users" . "-o するユーザ") ("Unset +v for users" . "-v するユーザ") ("WHO pattern: " . "WHO のパターン: ")