X-Git-Url: https://cgit.sxemacs.org/?a=blobdiff_plain;f=lisp%2Friece.el;h=1b66d4896da479d6feddcdeaf0ea1251b870e3f5;hb=93cc8b9f10b1b3e74d76de99a0e1e476b1ce0a11;hp=4e42c959dd291bb5eec12968b8f6b09fa93de0c2;hpb=3bd4eabb1e5828fe70afe0f7276eb7fb13d26a1e;p=riece

diff --git a/lisp/riece.el b/lisp/riece.el
index 4e42c95..1b66d48 100644
--- a/lisp/riece.el
+++ b/lisp/riece.el
@@ -53,7 +53,7 @@
 (put 'riece-channel-mode 'derived-mode-parent 'riece-dialogue-mode)
 
 (defvar riece-buffer-alist
-  '((riece-command-buffer "*Commands*" riece-command-mode)
+  '((riece-command-buffer "*Command*" riece-command-mode)
     (riece-dialogue-buffer "*Dialogue*" riece-dialogue-mode)
     (riece-others-buffer "*Others*" riece-others-mode)
     (riece-channel-list-buffer "*Channels*" riece-channel-list-mode)
@@ -180,7 +180,8 @@ If optional argument SAFE is nil, overwrite previous definitions."
 
   (riece-define-keys riece-command-mode-map
     "\r" riece-command-enter-message
-    [(control return)] riece-command-enter-message-as-notice)
+    [(control return)] riece-command-enter-message-as-notice
+    [tab] riece-command-complete-user)
 
   (riece-define-keys (riece-command-map riece-command-prefix
 					riece-command-mode-map)
@@ -346,13 +347,12 @@ For a list of the generic commands type \\[riece-command-generic] ? RET.
   (setq riece-away-indicator "-"
 	riece-operator-indicator "-"
 	major-mode 'riece-command-mode
-	mode-name "Commands"
+	mode-name "Command"
 	mode-line-buffer-identification
 	(riece-mode-line-buffer-identification
 	 '("Riece: "
 	   riece-away-indicator
 	   riece-operator-indicator
-	   riece-freeze-indicator
 	   " "
 	   riece-user-indicator
 	   " "
@@ -377,6 +377,7 @@ Instead, these commands are available:
 \\{riece-dialogue-mode-map}"
   (kill-all-local-variables)
   (make-local-variable 'riece-freeze)
+  (make-local-variable 'riece-freeze-indicator)
   (setq riece-freeze riece-default-freeze
 	riece-away-indicator "-"
 	riece-operator-indicator "-"