From: Lars Magne Ingebrigtsen <larsi@gnus.org>
Date: Tue, 2 Aug 2011 15:59:31 +0000 (+0200)
Subject: (ido-mode): Switch off the message if called non-interactively.
X-Git-Tag: emacs-pretest-24.0.90~104^2~124^2~66^2~14
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=92f2affc50fe6e47334957695abcc727339cb022;p=emacs.git

(ido-mode): Switch off the message if called non-interactively.
---

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 03c4f1dab02..b8e2b3bb5b4 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,5 +1,8 @@
 2011-08-02  Lars Magne Ingebrigtsen  <larsi@gnus.org>
 
+	* ido.el (ido-mode): Switch off the message if called
+	non-interactively.
+
 	* mail/smtpmail.el (smtpmail-query-smtp-server): Try port 25
 	before 587, since it appears that that's more likely to work for
 	more people.
diff --git a/lisp/ido.el b/lisp/ido.el
index b50ddcc1254..4086000e3e9 100644
--- a/lisp/ido.el
+++ b/lisp/ido.el
@@ -1557,7 +1557,8 @@ This function also adds a hook to the minibuffer."
 	(setq ido-minor-mode-map-entry (cons 'ido-mode map))
 	(add-to-list 'minor-mode-map-alist ido-minor-mode-map-entry))))
 
-  (message "Ido mode %s" (if ido-mode "enabled" "disabled")))
+  (when (called-interactively-p 'any)
+    (message "Ido mode %s" (if ido-mode "enabled" "disabled"))))
 
 
 ;;; IDO KEYMAP