Update of /project/climacs/cvsroot/climacs In directory clnet:/tmp/cvs-serv18812

Modified Files: io.lisp Log Message: Don't permit undoing the initial file load.

--- /project/climacs/cvsroot/climacs/io.lisp 2008/01/13 22:23:00 1.9 +++ /project/climacs/cvsroot/climacs/io.lisp 2008/01/24 09:29:28 1.10 @@ -62,4 +62,5 @@ (defmethod frame-make-buffer-from-stream ((application-frame climacs) stream) (let* ((buffer (make-new-buffer))) (input-from-stream stream buffer 0) + (clear-undo-history buffer) buffer))