[slime-cvs] CVS slime

[mbaringer]

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

Modified Files:
	slime.el 
Log Message:
(slime-global-variable-name-p): Use defun* instead of
defun.


--- /project/slime/cvsroot/slime/slime.el	2006/10/29 07:11:50	1.679
+++ /project/slime/cvsroot/slime/slime.el	2006/10/29 10:15:09	1.680
@@ -5669,7 +5669,7 @@
   (when-let (name (slime-symbol-name-at-point))
     (if (slime-global-variable-name-p name) name)))
 
-(defun slime-global-variable-name-p (name)
+(defun* slime-global-variable-name-p (name)
   "Is NAME a global variable?
 Globals are recognised purely by *this-naming-convention*."
   (string-match "^\\(.*:\\)?\\([*+]\\).+\\2$" name))