-(defun nnmbox-save-buffer ()
- (let ((coding-system-for-write
- (or nnmbox-file-coding-system-for-write
- nnmbox-file-coding-system)))
- (save-buffer)))
+(static-if (boundp 'MULE)
+ (defun nnmbox-save-buffer ()
+ (let ((output-coding-system
+ (or nnmbox-file-coding-system-for-write
+ nnmbox-file-coding-system)))
+ (save-buffer)))
+ (defun nnmbox-save-buffer ()
+ (let ((coding-system-for-write
+ (or nnmbox-file-coding-system-for-write
+ nnmbox-file-coding-system)))
+ (save-buffer)))
+ )