[slime-cvs] CVS slime/contrib

[CVS User trittweiler]

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

Modified Files:
	slime-autodoc.el ChangeLog 
Log Message:
	* slime-autodoc.el (slime-fontify-string): Deactivate autodoc
	itself in the temporary help buffer. And deactivate slime's
	font-lock magic.


--- /project/slime/cvsroot/slime/contrib/slime-autodoc.el	2009/03/09 22:40:21	1.15
+++ /project/slime/cvsroot/slime/contrib/slime-autodoc.el	2009/05/02 09:11:08	1.16
@@ -180,8 +180,10 @@
   "Fontify STRING as `font-lock-mode' does in Lisp mode."
   (with-current-buffer (get-buffer-create " *slime-fontify*")
     (erase-buffer)
-    (if (not (eq major-mode 'lisp-mode))
-        (lisp-mode))
+    (unless (eq major-mode 'lisp-mode)
+      (lisp-mode)
+      (slime-autodoc-mode -1)
+      (set (make-local-variable 'slime-highlight-suppressed-forms) nil))
     (insert string)
     (let ((font-lock-verbose nil))
       (font-lock-fontify-buffer))
--- /project/slime/cvsroot/slime/contrib/ChangeLog	2009/05/01 18:09:43	1.203
+++ /project/slime/cvsroot/slime/contrib/ChangeLog	2009/05/02 09:11:09	1.204
@@ -1,3 +1,9 @@
+2009-05-02  Tobias C. Rittweiler  <tcr at freebits.de>
+
+	* slime-autodoc.el (slime-fontify-string): Deactivate autodoc
+	itself in the temporary help buffer. And deactivate slime's
+	font-lock magic.
+
 2009-05-01  Tobias C. Rittweiler  <tcr at freebits.de>
 
 	* slime-parse.el (slime-parse-extended-operator/check-type):