# HG changeset patch
# User Stefan Monnier <monnier@iro.umontreal.ca>
# Date 1189890452 0
# Node ID 52ca2a6a41bf31fb8a523038b687222a875c98de
# Parent  b5d78f18d0871f8bbc2f68684c19feadae5fae4c
(vc-cvs-annotate-time): Use inhibit-read-only and inhibit-modification-hooks.

diff -r b5d78f18d087 -r 52ca2a6a41bf lisp/ChangeLog
--- a/lisp/ChangeLog	Sat Sep 15 21:05:53 2007 +0000
+++ b/lisp/ChangeLog	Sat Sep 15 21:07:32 2007 +0000
@@ -1,5 +1,8 @@
 2007-09-15  Stefan Monnier  <monnier@iro.umontreal.ca>
 
+	* vc-cvs.el (vc-cvs-annotate-time): Use inhibit-read-only and
+	inhibit-modification-hooks.
+
 	* calendar/cal-bahai.el (mark-bahai-diary-entries): Fix up typo.
 	(calendar-bahai-print-date, calendar-bahai-goto-date)
 	(diary-bahai-list-entries, diary-bahai-insert-entry):
diff -r b5d78f18d087 -r 52ca2a6a41bf lisp/vc-cvs.el
--- a/lisp/vc-cvs.el	Sat Sep 15 21:05:53 2007 +0000
+++ b/lisp/vc-cvs.el	Sat Sep 15 21:07:32 2007 +0000
@@ -590,7 +590,8 @@
 systime, or nil if there is none."
   (let* ((bol (point))
          (cache (get-text-property bol 'vc-cvs-annotate-time))
-         buffer-read-only)
+         (inhibit-read-only t)
+         (inhibit-modification-hooks t))
     (cond
      (cache)
      ((looking-at