From 3c5471b8a24ad279aa03717c5b1ef881bc183f25 Mon Sep 17 00:00:00 2001
From: Stefan Monnier <monnier@iro.umontreal.ca>
Date: Fri, 17 Nov 2006 02:58:35 +0000
Subject: (cvs-retrieve-revision): Set buffer-file-coding-system.

---
 lisp/pcvs.el | 2 ++
 1 file changed, 2 insertions(+)

(limited to 'lisp/pcvs.el')

diff --git a/lisp/pcvs.el b/lisp/pcvs.el
index 1f2bad13dc..52237005d2 100644
--- a/lisp/pcvs.el
+++ b/lisp/pcvs.el
@@ -1741,6 +1741,8 @@ Signal an error if there is no backup file."
             ;; into a sequence of chars.
             (decode-coding-inserted-region
              (point-min) (point-max) file t nil nil t)
+            ;; Set buffer-file-coding-system.
+            (after-insert-file-set-coding (buffer-size) t)
 	    (set-buffer-modified-p nil)
 	    (let ((buffer-file-name (expand-file-name file)))
 	      (after-find-file))
-- 
cgit v1.2.3