[slime-cvs] CVS slime/contrib

[CVS User trittweiler]

Update of /project/slime/cvsroot/slime/contrib
In directory cl-net:/tmp/cvs-serv26096/contrib

Modified Files:
	ChangeLog slime-autodoc.el 
Log Message:
	* slime-autodoc.el (slime-autodoc-mode): Only display
	"enabled"/"disabled" message if called interactively.


--- /project/slime/cvsroot/slime/contrib/ChangeLog	2010/01/03 16:54:40	1.330
+++ /project/slime/cvsroot/slime/contrib/ChangeLog	2010/01/03 20:50:42	1.331
@@ -1,5 +1,10 @@
 2010-01-03  Tobias C. Rittweiler  <tcr at freebits.de>
 
+	* slime-autodoc.el (slime-autodoc-mode): Only display
+	"enabled"/"disabled" message if called interactively.
+
+2010-01-03  Tobias C. Rittweiler  <tcr at freebits.de>
+
 	* slime-autodoc.el (slime-autodoc): Renamed from
 	`slime-compute-autodoc'; now also interactive.
 	(slime-autodoc-mode): Implement toggling properly. Make modeline
--- /project/slime/cvsroot/slime/contrib/slime-autodoc.el	2010/01/03 16:54:40	1.30
+++ /project/slime/cvsroot/slime/contrib/slime-autodoc.el	2010/01/03 20:50:42	1.31
@@ -194,8 +194,9 @@
   (setq eldoc-idle-delay slime-autodoc-delay)
   (setq eldoc-minor-mode-string " Autodoc")
   (setq slime-autodoc-mode (eldoc-mode arg))
-  (message (format "Slime autodoc mode %s"
-                   (if slime-autodoc-mode "enabled" "disabled"))))
+  (when (interactive-p)
+    (message (format "Slime autodoc mode %s."
+                     (if slime-autodoc-mode "enabled" "disabled")))))
 
 (defadvice eldoc-display-message-no-interference-p 
     (after slime-autodoc-message-ok-p)