From 199b193f54cc4407b8d98c15fb5eeff391df24b8 Mon Sep 17 00:00:00 2001 From: Arthur Gleckler Date: Mon, 25 Nov 1991 21:51:20 +0000 Subject: [PATCH] Fix run-on sentence: "Tags file has changed, read new contents" with semicolon. --- v7/src/edwin/tagutl.scm | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/v7/src/edwin/tagutl.scm b/v7/src/edwin/tagutl.scm index 0d9b42c96..4471ce83d 100644 --- a/v7/src/edwin/tagutl.scm +++ b/v7/src/edwin/tagutl.scm @@ -1,6 +1,6 @@ ;;; -*-Scheme-*- ;;; -;;; $Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/v7/src/edwin/tagutl.scm,v 1.44 1991/11/04 20:52:09 cph Exp $ +;;; $Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/v7/src/edwin/tagutl.scm,v 1.45 1991/11/25 21:51:20 arthur Exp $ ;;; ;;; Copyright (c) 1986, 1989-91 Massachusetts Institute of Technology ;;; @@ -272,7 +272,7 @@ See documentation of variable tags-file-name." (let ((buffer (find-file-noselect pathname false))) (if (and (not (verify-visited-file-modification-time? buffer)) (prompt-for-yes-or-no? - "Tags file has changed, read new contents")) + "Tags file has changed; read new contents")) (revert-buffer buffer true true)) (if (not (eqv? (extract-right-char (buffer-start buffer)) #\Page)) (editor-error "File " -- 2.25.1