X-Git-Url: https://code.delx.au/gnu-emacs/blobdiff_plain/9151f16e8131e6fcd94aa9c8a1b10d9b08656b64..2d02a5f729c804e841fee5df5b2ae2a06b705bd3:/lisp/vc/vc-annotate.el diff --git a/lisp/vc/vc-annotate.el b/lisp/vc/vc-annotate.el index 379ac95517..774453f8b5 100644 --- a/lisp/vc/vc-annotate.el +++ b/lisp/vc/vc-annotate.el @@ -432,10 +432,11 @@ should be applied to the background or to the foreground." (with-output-to-temp-buffer temp-buffer-name (let ((backend (or vc-bk (vc-backend file))) (coding-system-for-read buffer-file-coding-system)) - ;; On DOS/Windows, "svn annotate" will produce CRLF EOLs even - ;; if the original file has Unix EOLs, which will show ^M - ;; characters in the Annotate buffer. Prevent that by forcing - ;; DOS EOL decoding. + ;; For a VC backend running on DOS/Windows, it's normal to + ;; produce CRLF EOLs even if the original file has Unix EOLs, + ;; which will show ^M characters in the Annotate buffer. (One + ;; known case in point is "svn annotate".) Prevent that by + ;; forcing DOS EOL decoding. (if (memq system-type '(windows-nt ms-dos)) (setq coding-system-for-read (coding-system-change-eol-conversion coding-system-for-read