Use noninteractive' correctly in twittering-call-api'.

* twittering-mode.el (twittering-call-api): use the argument `noninteractive' correctly.
hayamiz · Sep 3, 2010 · c253e63 · c253e63
1 parent b067037
commit c253e63
Show file tree

Hide file tree

Showing 2 changed files with 5 additions and 2 deletions.
diff --git a/ChangeLog b/ChangeLog
@@ -22,6 +22,9 @@
 	* twittering-mode.el (twittering-http-post): remove use of unbound
 	variable `noninteractive'.
 
+	* twittering-mode.el (twittering-call-api): use the argument
+	`noninteractive' correctly.
+
 2010-08-25  Tadashi MATSUO  <tad@mymail.twin.jp>
 
 	* twittering-mode.el: Confirm that a buffer associated with a

diff --git a/twittering-mode.el b/twittering-mode.el
@@ -454,7 +454,7 @@ StatusNet Service.")
 	  (clean-up-sentinel (cdr (assq 'clean-up-sentinel args-alist))))
       (twittering-http-get twittering-api-host
 			   (twittering-api-path username "/lists")
-			   t nil nil sentinel clean-up-sentinel)))
+			   noninteractive nil nil sentinel clean-up-sentinel)))
    ((eq command 'create-friendships)
     ;; Create a friendship.
     (let ((username (cdr (assq 'username args-alist))))
@@ -505,7 +505,7 @@ StatusNet Service.")
 	  (clean-up-sentinel (cdr (assq 'clean-up-sentinel args-alist))))
       (twittering-http-get twittering-api-host
 			   (twittering-api-path "account/verify_credentials")
-			   t nil nil
+			   noninteractive nil nil
 			   sentinel clean-up-sentinel)))
    ((eq command 'send-direct-message)
     ;; Send a direct message.