* riece-server.el (riece-open-server): Append the server-name to
authorueno <ueno>
Sat, 20 Mar 2004 03:22:32 +0000 (03:22 +0000)
committerueno <ueno>
Sat, 20 Mar 2004 03:22:32 +0000 (03:22 +0000)
the prompt string.

lisp/ChangeLog
lisp/riece-server.el

index 7ffb53a..87c65f8 100644 (file)
@@ -1,3 +1,8 @@
+2004-03-20  Daiki Ueno  <ueno@unixuser.org>
+
+       * riece-server.el (riece-open-server): Append the server-name to
+       the prompt string.
+
 2004-03-14  Daiki Ueno  <ueno@unixuser.org>
 
        * riece-display.el (riece-display-connect-signals): Update
index 5c6b420..c552180 100644 (file)
@@ -155,7 +155,11 @@ the `riece-server-keyword-map' variable."
          (unwind-protect
              ;; XEmacs signals an error when the keyboard cannot be grabbed.
              (condition-case nil
-                 (setq password (riece-read-passwd "Password: "))
+                 (setq password
+                       (if (equal server-name "")
+                           (riece-read-passwd "Password: ")
+                         (riece-read-passwd (format "Password for %s: "
+                                                    server-name))))
                (error))
            (setq riece-reconnect-with-password nil)))
       (if password