[slime-cvs] CVS slime/contrib

[heller]

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

Modified Files:
	ChangeLog slime-scratch.el 
Log Message:
* slime-scratch.el (slime-scratch-buffer): Ignore presentations. 


--- /project/slime/cvsroot/slime/contrib/ChangeLog	2007/08/27 12:36:11	1.10
+++ /project/slime/cvsroot/slime/contrib/ChangeLog	2007/08/27 12:58:51	1.11
@@ -1,5 +1,9 @@
 2007-08-27  Helmut Eller  <heller at common-lisp.net>
 
+	* slime-scratch.el (slime-scratch-buffer): Ignore presentations. 
+
+2007-08-27  Helmut Eller  <heller at common-lisp.net>
+
 	Move presentations to contrib. (ELisp part)
 
 	* slime-presentations.el: New file.
--- /project/slime/cvsroot/slime/contrib/slime-scratch.el	2007/08/24 13:15:45	1.1
+++ /project/slime/cvsroot/slime/contrib/slime-scratch.el	2007/08/27 12:58:51	1.2
@@ -12,6 +12,7 @@
 ;;
 
 
+;;; Code
 
 (defvar slime-scratch-mode-map
   (let ((map (make-sparse-keymap)))
@@ -34,9 +35,6 @@
 	(lisp-mode)
 	(use-local-map slime-scratch-mode-map)
 	(slime-mode t)
-        (when slime-repl-enable-presentations 
-          ;; Respect the syntax text properties of presentations.
-          (set (make-local-variable 'parse-sexp-lookup-properties) t))
 	(current-buffer))))
 
 (slime-define-keys slime-scratch-mode-map