[slime-cvs] CVS slime/contrib

[CVS User sboukarev]

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

Modified Files:
	ChangeLog slime-repl.el 
Log Message:
contrib/slime-repl.el (slime-sync-package-and-default-directory): Better checking for packages.


--- /project/slime/cvsroot/slime/contrib/ChangeLog	2009/09/28 21:28:29	1.249
+++ /project/slime/cvsroot/slime/contrib/ChangeLog	2009/09/29 03:21:30	1.250
@@ -1,3 +1,8 @@
+2009-09-29  Stas Boukarev  <stassats at gmail.com>
+
+	* slime-repl.el (slime-sync-package-and-default-directory):
+	Better checking for packages.
+
 2009-09-28  Stas Boukarev  <stassats at gmail.com>
 
 	* slime-repl.el (slime-sync-package-and-default-directory):
--- /project/slime/cvsroot/slime/contrib/slime-repl.el	2009/09/28 21:28:29	1.26
+++ /project/slime/cvsroot/slime/contrib/slime-repl.el	2009/09/29 03:21:31	1.27
@@ -1451,7 +1451,7 @@
   (interactive)
   (let* ((package (slime-current-package))
          (exists-p (or (null package)
-                       (slime-eval `(swank::guess-package ,package))))
+                       (slime-eval `(cl:packagep (swank::guess-package ,package)))))
          (directory default-directory))
     (when (and package exists-p)
       (slime-repl-set-package package))