[slime-cvs] CVS slime

[CVS User heller]

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

Modified Files:
	ChangeLog slime.el 
Log Message:
* slime.el (slime-current-package): Move REPL stuff to contrib.
* slime-repl.el (slime-repl-find-buffer-package): New function.
(slime-repl-init): Initialize slime-find-buffer-package-function.

--- /project/slime/cvsroot/slime/ChangeLog	2009/10/15 13:10:09	1.1873
+++ /project/slime/cvsroot/slime/ChangeLog	2009/10/15 16:40:37	1.1874
@@ -1,3 +1,7 @@
+2009-10-15  Helmut Eller  <heller at common-lisp.net>
+
+	* slime.el (slime-current-package): Move REPL stuff to contrib.
+
 2009-10-15  Stas Boukarev  <stassats at gmail.com>
 
 	* slime.el (slime-current-package): Return REPL's package,
--- /project/slime/cvsroot/slime/slime.el	2009/10/15 13:10:09	1.1227
+++ /project/slime/cvsroot/slime/slime.el	2009/10/15 16:40:38	1.1228
@@ -43,9 +43,8 @@
 ;;   Trapping compiler messages and creating annotations in the source
 ;;   file on the appropriate forms.
 ;;
-;; SLIME is compatible with GNU Emacs 22, and 23; the maintainers do
-;; not use XEmacs, and hence do not cater for its support. Patches
-;; tend to be accepted, though.
+;; SLIME should work with Emacs 22 and 23.  If it works on XEmacs,
+;; consider yourself lucky.
 ;;
 ;; In order to run SLIME, a supporting Lisp server called Swank is
 ;; required. Swank is distributed with slime.el and will automatically
@@ -2258,9 +2257,7 @@
   (or slime-buffer-package
       (save-restriction
         (widen)
-        (slime-find-buffer-package))
-      (when (fboundp 'slime-lisp-package)
-        (slime-lisp-package))))
+        (slime-find-buffer-package))))
 
 (defvar slime-find-buffer-package-function 'slime-search-buffer-package
   "*Function to use for `slime-find-buffer-package'.