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

[Helmut Eller]

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

Modified Files:
	slime.el 
Log Message:
(slime-background-activities-enabled-p): Allow background stuff in
repl-mode buffers too.

Date: Fri Jun  3 22:00:12 2005
Author: heller

Index: slime/slime.el
diff -u slime/slime.el:1.505 slime/slime.el:1.506
--- slime/slime.el:1.505	Wed Jun  1 18:59:54 2005
+++ slime/slime.el	Fri Jun  3 22:00:11 2005
@@ -366,7 +366,11 @@
   "Face for the prompt in the SLIME REPL."
   :group 'slime-repl)
 
-(defcustom slime-repl-enable-presentations t; (not (featurep 'xemacs)) - alanr should work now.
+(defcustom slime-repl-enable-presentations
+  (cond ((and (not (featurep 'xemacs)) (= emacs-major-version 20))
+         ;; mouseable text sucks in Emacs 20
+         nil)
+        (t t))
   "Should we enable presentations"
   :type '(boolean)
   :group 'slime-repl)
@@ -2040,7 +2044,8 @@
   "*If true, don't send background requests if Lisp is already busy.")
 
 (defun slime-background-activities-enabled-p ()
-  (and slime-mode
+  (and (or slime-mode 
+           (eq major-mode 'slime-repl-mode))
        (slime-current-connection)
        (or (not (slime-busy-p))
            (not slime-inhibit-pipelining))))