[slime-cvs] CVS update: slime/slime.el

[Luke Gorrie]

Update of /project/slime/cvsroot/slime
In directory common-lisp.net:/tmp/cvs-serv3537

Modified Files:
	slime.el 
Log Message:
(slime-buffer-package): If DONT-CACHE is true and no package name can
be found, then default to "COMMON-LISP-USER."  Previously we just kept
using the cached version, but that could lead to error-after-error if
it was incorrect.

Date: Fri Jun 18 14:54:15 2004
Author: lgorrie

Index: slime/slime.el
diff -u slime/slime.el:1.320 slime/slime.el:1.321
--- slime/slime.el:1.320	Fri Jun 18 12:26:12 2004
+++ slime/slime.el	Fri Jun 18 14:54:15 2004
@@ -758,7 +758,10 @@
                       (setq slime-buffer-package string)
                       (force-mode-line-update)))
                string)
-              (t slime-buffer-package)))))
+              (t
+               (if dont-cache
+                   "COMMON-LISP-USER"
+                 slime-buffer-package))))))
 
 (defun slime-find-buffer-package ()
   "Figure out which Lisp package the current buffer is associated with."