[slime-cvs] CVS slime

[CVS User trittweiler]

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

Modified Files:
	slime.el ChangeLog 
Log Message:
	* slime.el (slime-initialize-macroexpansion-buffer): Clear the
	buffer-undo-list, so the user can't get expansions from earlier
	macroexpansions into the buffer, screwing up badly.


--- /project/slime/cvsroot/slime/slime.el	2009/01/23 10:05:03	1.1119
+++ /project/slime/cvsroot/slime/slime.el	2009/02/06 23:48:14	1.1120
@@ -4948,6 +4948,8 @@
 
 (defun slime-initialize-macroexpansion-buffer (expansion &optional buffer)
   (pop-to-buffer (or buffer (slime-create-macroexpansion-buffer)))
+  (setq buffer-undo-list nil) ; Get rid of undo information from
+                              ; previous expansions.
   (let ((inhibit-read-only t)
         (buffer-undo-list t)) ; Make the initial insertion not be undoable.
     (erase-buffer)
--- /project/slime/cvsroot/slime/ChangeLog	2009/01/30 09:58:48	1.1674
+++ /project/slime/cvsroot/slime/ChangeLog	2009/02/06 23:48:14	1.1675
@@ -1,3 +1,9 @@
+2009-02-07  Tobias C. Rittweiler  <tcr at freebits.de>
+
+	* slime.el (slime-initialize-macroexpansion-buffer): Clear the
+	buffer-undo-list, so the user can't get expansions from earlier
+	macroexpansions into the buffer, screwing up badly.
+
 2009-01-30  Tobias C. Rittweiler  <tcr at freebits.de>
 
 	* swank-clisp.lisp (fspec-location): Fix creation of source-location.