# HG changeset patch
# User Stefan Monnier <monnier@iro.umontreal.ca>
# Date 1163732315 0
# Node ID 82fde7e4c23baef415f90d593e531c20da143648
# Parent  c05de7bec0576fa709f8e34e915d1a7db92bf8f6
(cvs-retrieve-revision): Set buffer-file-coding-system.

diff -r c05de7bec057 -r 82fde7e4c23b lisp/ChangeLog
--- a/lisp/ChangeLog	Thu Nov 16 20:53:46 2006 +0000
+++ b/lisp/ChangeLog	Fri Nov 17 02:58:35 2006 +0000
@@ -1,3 +1,7 @@
+2006-11-17  Stefan Monnier  <monnier@iro.umontreal.ca>
+
+	* pcvs.el (cvs-retrieve-revision): Set buffer-file-coding-system.
+
 2006-11-16  Chong Yidong  <cyd@stupidchicken.com>
 
 	* mouse.el (global-map): Change 2006-08-16 fix to call
diff -r c05de7bec057 -r 82fde7e4c23b lisp/pcvs.el
--- a/lisp/pcvs.el	Thu Nov 16 20:53:46 2006 +0000
+++ b/lisp/pcvs.el	Fri Nov 17 02:58:35 2006 +0000
@@ -1741,6 +1741,8 @@
             ;; 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))