Mercurial > hg > xemacs-beta

diff lisp/vm/vm-window.el @ 100:4be1180a9e89 r20-1b2

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Import from CVS: tag r20-1b2
author cvs
date Mon, 13 Aug 2007 09:15:11 +0200
parents 0d2f883870bc
children a145efe76779
line wrap: on
line diff
--- a/lisp/vm/vm-window.el	Mon Aug 13 09:13:58 2007 +0200
+++ b/lisp/vm/vm-window.el	Mon Aug 13 09:15:11 2007 +0200
@@ -131,6 +131,9 @@
       (unwind-protect
 	  (progn
 	    (set-buffer (setq work-buffer (get-buffer-create "*vm-wconfig*")))
+	    ;; for XEmacs/MULE
+	    (and (fboundp 'set-file-coding-system)
+		 (set-file-coding-system 'no-conversion))
 	    (erase-buffer)
 	    (print vm-window-configurations (current-buffer))
 	    (write-region (point-min) (point-max) file nil 0))