From 0176b1afe505be41a2af7920aaa8c99dc3d5407d Mon Sep 17 00:00:00 2001 From: William Xu Date: Sun, 21 Dec 2008 15:07:50 +0800 Subject: emms-i18n-default-coding-system: Change default value from nil to '(no-conversion . no-conversion). --- lisp/emms-i18n.el | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'lisp') diff --git a/lisp/emms-i18n.el b/lisp/emms-i18n.el index 416a33c..7e95916 100644 --- a/lisp/emms-i18n.el +++ b/lisp/emms-i18n.el @@ -55,7 +55,7 @@ this list, use `emms-i18n-default-coding-system' instead.") (defvar emms-i18n-coding-system-for-read 'utf-8 "If coding detect failed, use this for decode") -(defvar emms-i18n-default-coding-system nil +(defvar emms-i18n-default-coding-system '(no-conversion . no-conversion) "If non-nil, used for decode and encode") (defvar emms-i18n-coding-dectect-functions nil @@ -119,7 +119,7 @@ not perform." (setq pos (point))) (setq exit (apply 'call-process args)) (when (and (eq (nth 2 args) 't) - (null (car emms-i18n-default-coding-system))) + (eq (car emms-i18n-default-coding-system) 'no-conversion)) (save-restriction (narrow-to-region pos (point)) (decode-coding-region (point-min) (point-max) (emms-i18n-detect-buffer-coding-system)))) -- cgit v1.2.3