Update of /project/climacs/cvsroot/climacs In directory clnet:/tmp/cvs-serv28020
Modified Files: core.lisp Log Message: Tell newly loaded files that they do not need to be saved.
--- /project/climacs/cvsroot/climacs/core.lisp 2007/12/11 23:19:45 1.17 +++ /project/climacs/cvsroot/climacs/core.lisp 2007/12/12 23:44:42 1.18 @@ -330,7 +330,8 @@ (setf (offset (point buffer)) (offset (point view)) (current-view) view (syntax view) (make-syntax-for-view view (syntax-class-name-for-filepath filepath)) - (file-write-time buffer) (file-write-date filepath)) + (file-write-time buffer) (file-write-date filepath) + (needs-saving buffer) nil) (evaluate-attribute-line view) (setf (filepath buffer) filepath (read-only-p buffer) readonlyp)