- ;; This is necessary to have the buffer saved as-is.
- (set-buffer-multibyte nil)
+ ;; This is necessary to have the buffer saved as-is in GNU
+ ;; XEmacs change: We don't have `set-buffer-multibyte', setting
+ ;; coding system to 'binary below takes care of us.
+ (when (fboundp 'set-buffer-multibyte)
+ (set-buffer-multibyte nil))
(setq mode-line-process '(":%s")