Commit 358021a5 authored by Troels Henriksen's avatar Troels Henriksen
Browse files

Don't permit undoing the initial file load.

parent 4feb284e
......@@ -62,4 +62,5 @@ the buffer `buffer' and the filepath `filepath'."
(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)
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment