From: ueno Date: Tue, 27 May 2008 07:11:53 +0000 (+0000) Subject: (riece-menu-items): Bind riece-command-configure-windows. X-Git-Tag: riece-5_0_0~18 X-Git-Url: http://git.chise.org/gitweb/?p=elisp%2Friece.git;a=commitdiff_plain;h=c7eb7d506649918da5739b35f36cf53ad4a29497 (riece-menu-items): Bind riece-command-configure-windows. --- diff --git a/lisp/ChangeLog b/lisp/ChangeLog index e8df213..1c26389 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,7 +1,8 @@ 2008-05-27 Daiki Ueno * riece-menu.el (riece-menu-items): Define with defcustom; use - riece-mcat to translate menu labels. + riece-mcat to translate menu labels; bind + riece-command-configure-windows. (riece-menu-requires): Depend on riece-mcat. (riece-menu-insinuate): Re-evaluate riece-menu-items. diff --git a/lisp/riece-mcat-japanese.el b/lisp/riece-mcat-japanese.el index 3fd8020..2cf659a 100644 --- a/lisp/riece-mcat-japanese.el +++ b/lisp/riece-mcat-japanese.el @@ -157,6 +157,7 @@ ("Receiving %s from %s...done" . "%s を %s から受信中...完了") ("Recent messages of the day:\n" . "最近のメッセージ (今日中):\n") ("Recent messages up to %d lines:\n" . "最近のメッセージ (%d 行まで):\n") + ("Redraw Layout" . "画面の再描画") ("Save as (default %s) " . "保存先 (既定値 %s) ") ("Saving %s..." . "%s を保存しています...") ("Saving %s...done" . "%s を保存しています...完了") diff --git a/lisp/riece-menu.el b/lisp/riece-menu.el index fcf0a4f..19d98b4 100644 --- a/lisp/riece-menu.el +++ b/lisp/riece-menu.el @@ -48,6 +48,7 @@ (list (riece-mcat "Servers") :filter 'riece-menu-create-servers-menu) "----" + (vector (riece-mcat "Redraw Layout") 'riece-command-configure-windows t) (list (riece-mcat "Change Window Layout...") :filter 'riece-menu-create-layouts-menu) (list (riece-mcat "Toggle...")