From: ueno <ueno>
Date: Wed, 6 Jun 2007 09:13:06 +0000 (+0000)
Subject: Fixed.
X-Git-Tag: riece-5_0_0~45
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=9fab6517fc217311d3741753fd4e3c1f33e8c74a;p=elisp%2Friece.git

Fixed.
---

diff --git a/lisp/riece-twitter.el b/lisp/riece-twitter.el
index a93e9fc..d828412 100644
--- a/lisp/riece-twitter.el
+++ b/lisp/riece-twitter.el
@@ -50,11 +50,11 @@
    (let ((username (read-string "Username: "))
 	 password)
      (unwind-protect
-	 (setq password (read-passwd "Password: "))
+	 (list (concat username ":"
+		       (setq password (read-passwd "Password: "))))
        (if password
 	   (riece-twitter-clear-string password))
-       (setq password nil))
-     (list (concat username ":" password))))
+       (setq password nil))))
   (setq riece-twitter-credential credential))
 
 (defun riece-twitter-update (status)