[Emacs-diffs] Changes to emacs/lisp/view.el,v [EMACS_22_BASE]

[Eli Zaretskii]

CVSROOT:        /cvsroot/emacs
Module name:    emacs
Branch:         EMACS_22_BASE
Changes by:     Eli Zaretskii <eliz>    08/01/19 14:04:35

Index: view.el
===================================================================
RCS file: /cvsroot/emacs/emacs/lisp/view.el,v
retrieving revision 1.84.2.8
retrieving revision 1.84.2.9
diff -u -b -r1.84.2.8 -r1.84.2.9
--- view.el     12 Jan 2008 17:16:20 -0000      1.84.2.8
+++ view.el     19 Jan 2008 14:04:35 -0000      1.84.2.9
@@ -238,6 +238,10 @@
 
 ;;; Commands that enter or exit view mode.
 
+;; This is used when view mode is exited, to make sure we don't try to
+;; kill a buffer modified by the user.  A buffer in view mode can
+;; become modified if the user types C-x C-q, edits the buffer, then
+;; types C-x C-q again to return to view mode.
 (defun kill-buffer-if-not-modified (buf)
   "Like `kill-buffer', but does nothing if the buffer is modified."
   (let ((buf (or (bufferp buf) (get-buffer buf))))