[slime-cvs] CVS slime

[mkoeppe]

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

Modified Files:
	slime.el 
Log Message:
(slime-enclosing-operator-names): Fix last change.


--- /project/slime/cvsroot/slime/slime.el	2006/03/28 00:43:16	1.609
+++ /project/slime/cvsroot/slime/slime.el	2006/03/28 20:05:16	1.610
@@ -10079,8 +10079,7 @@
                 (when-let (name (slime-symbol-name-at-point))
                   ;; Detect MAKE-INSTANCE forms and collect the class-name
                   ;; if exists and is a quoted symbol.
-                  (let ((symbol-name (upcase (slime-cl-symbol-name name)))
-                        (package (upcase (slime-cl-symbol-package name))))
+                  (let ((symbol-name (upcase (slime-cl-symbol-name name))))
                     (ignore-errors
                       (cond
                        ((member symbol-name