X-Git-Url: https://cgit.sxemacs.org/?p=riece;a=blobdiff_plain;f=lisp%2Friece-commands.el;h=d8319f26589d7914aa7293affda3d57265689640;hp=a4c0cf2223541c6c82f633425a9ddb0452f1995d;hb=fe0b24ee8ff72ec70f44d4b435506987701f3a0c;hpb=107d20094003503fbc588b00e239c490f17d5c67 diff --git a/lisp/riece-commands.el b/lisp/riece-commands.el index a4c0cf2..d8319f2 100644 --- a/lisp/riece-commands.el +++ b/lisp/riece-commands.el @@ -117,7 +117,8 @@ "Select a layout-name from all current available layouts and change the layout to the selected layout-name." (interactive (list (completing-read "Layout: " riece-layout-alist))) - (customize-set-variable 'riece-layout name)) + (setq riece-layout name) + (riece-command-configure-windows)) (defun riece-command-toggle-channel-buffer-mode () (interactive) @@ -424,7 +425,7 @@ the layout to the selected layout-name." "Channel/User: " riece-current-channels)) key) (if (and current-prefix-arg - (riece-channel-p target)) + (riece-channel-p (riece-identity-prefix target))) (setq key (riece-read-passwd (format "Key for %s: " target)))) (list target key)))