(riece-menu-items): Bind riece-command-configure-windows.
authorueno <ueno>
Tue, 27 May 2008 07:11:53 +0000 (07:11 +0000)
committerueno <ueno>
Tue, 27 May 2008 07:11:53 +0000 (07:11 +0000)
lisp/ChangeLog
lisp/riece-mcat-japanese.el
lisp/riece-menu.el

index e8df213..1c26389 100644 (file)
@@ -1,7 +1,8 @@
 2008-05-27  Daiki Ueno  <ueno@unixuser.org>
 
        * 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.
 
index 3fd8020..2cf659a 100644 (file)
     ("Receiving %s from %s...done" . "%s \e$B$r\e(B %s \e$B$+$i<u?.Cf\e(B...\e$B40N;\e(B")
     ("Recent messages of the day:\n" . "\e$B:G6a$N%a%C%;!<%8\e(B (\e$B:#F|Cf\e(B):\n")
     ("Recent messages up to %d lines:\n" . "\e$B:G6a$N%a%C%;!<%8\e(B (%d \e$B9T$^$G\e(B):\n")
+    ("Redraw Layout" . "\e$B2hLL$N:FIA2h\e(B")
     ("Save as (default %s) " . "\e$BJ]B8@h\e(B (\e$B4{DjCM\e(B %s) ")
     ("Saving %s..." . "%s \e$B$rJ]B8$7$F$$$^$9\e(B...")
     ("Saving %s...done" . "%s \e$B$rJ]B8$7$F$$$^$9\e(B...\e$B40N;\e(B")
index fcf0a4f..19d98b4 100644 (file)
@@ -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...")