(toggle-read-only): Clean up the hint message.

2 files changed, 22 insertions, 2 deletions

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 59f0b1de12b..bb46820e26e 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,23 @@
+2002-07-20  Richard M. Stallman  <rms@gnu.org>
+
+        * files.el (toggle-read-only): Clean up the hint message.
+
+        * emacs-lisp/bytecomp.el: Use warnings.el.
+        (byte-compile-warning-prefix): New function.
+        (byte-compile-log-file): Return page start position.
+        (byte-compile-log-warning): New function.
+        (byte-compile-warn): Use byte-compile-log-warning.
+        (byte-compile-report-error): Likewise.  Also use error-message-string.
+        (displaying-byte-compile-warnings): Bind warning-series.
+        Don't bind or use byte-compile-warnings-point-max.
+        Don't display the log buffer at the end.
+        (byte-compile-warnings-point-max): Variable deleted.
+        (byte-compile-log-1): Rewrite for trace info, not used for warnings.
+        (byte-compile-last-warned-form, byte-compile-last-logged-file): 
+        Defvars moved.
+        
+        * warnings.el: New file.
+
 2002-07-19  Richard M. Stallman  <rms@gnu.org>
 
         * emacs-lisp/bytecomp.el (byte-compile-cl-warn): Delete `values'
diff --git a/lisp/files.el b/lisp/files.el
index 81143edbc63..51fde3fd271 100644
--- a/lisp/files.el
+++ b/lisp/files.el
@@ -3074,8 +3074,8 @@ If visiting file read-only and `view-read-only' is non-nil, enter view mode."
         (force-mode-line-update)))
     (if (vc-backend buffer-file-name)
         (message (substitute-command-keys
-                  (concat "File is under version-control, "
-                          "consider \\[vc-next-action] to check in/out"))))))
+                  (concat "File is under version-control; "
+                          "use \\[vc-next-action] to check in/out"))))))
 
 (defun insert-file (filename)
   "Insert contents of file FILENAME into buffer after point.