* riece-commands.el (riece-command-join): Extract target
[riece] / lisp / riece-commands.el
index a4c0cf2..d8319f2 100644 (file)
   "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)))