[slime-cvs] CVS slime/contrib

[heller]

Update of /project/slime/cvsroot/slime/contrib
In directory clnet:/tmp/cvs-serv3479

Modified Files:
	ChangeLog slime-autodoc.el 
Log Message:
Use slime-require instead of a connected-hook.

* slime-autodoc.el (slime-autodoc-on-connect): Deleted.


--- /project/slime/cvsroot/slime/contrib/ChangeLog	2008/01/20 16:18:49	1.80
+++ /project/slime/cvsroot/slime/contrib/ChangeLog	2008/01/27 10:13:07	1.81
@@ -1,3 +1,9 @@
+2008-01-27  Helmut Eller  <heller at common-lisp.net>
+
+	Use slime-require instead of a connected-hook.
+	
+	* slime-autodoc.el (slime-autodoc-on-connect): Deleted.
+
 2008-01-20  Matthias Koeppe  <mkoeppe at mail.math.uni-magdeburg.de>
 
 	Hook presentations into debugger and inspector, restoring 
--- /project/slime/cvsroot/slime/contrib/slime-autodoc.el	2007/10/01 13:37:10	1.5
+++ /project/slime/cvsroot/slime/contrib/slime-autodoc.el	2008/01/27 10:13:09	1.6
@@ -253,21 +253,18 @@
 
 (defun slime-autodoc-init ()
   (setq slime-echo-arglist-function 'slime-autodoc)
-  (add-hook 'slime-connected-hook 'slime-autodoc-on-connect)
   (dolist (h '(slime-mode-hook slime-repl-mode-hook sldb-mode-hook))
     (add-hook h 'slime-autodoc-maybe-enable)))
 
-(defun slime-autodoc-on-connect ()
-  (slime-eval-async '(swank:swank-require :swank-arglists)))
-
 (defun slime-autodoc-maybe-enable ()
   (when slime-use-autodoc-mode 
     (slime-autodoc-mode 1)))
 
 (defun slime-autodoc-unload ()
   (setq slime-echo-arglist-function 'slime-show-arglist)
-  (remove-hook 'slime-connected-hook 'slime-autodoc-on-connect)
   (dolist (h '(slime-mode-hook slime-repl-mode-hook sldb-mode-hook))
     (remove-hook h 'slime-autodoc-maybe-enable)))
 
+(slime-require :swank-arglists)
+
 (provide 'slime-autodoc)