diff options
| author | William Xu <william.xwl@gmail.com> | 2008-12-21 15:07:50 +0800 |
|---|---|---|
| committer | William Xu <william.xwl@gmail.com> | 2008-12-21 15:07:50 +0800 |
| commit | 0176b1afe505be41a2af7920aaa8c99dc3d5407d (patch) | |
| tree | efacd9cbb767e0ba5284d71a7265131edb02d182 /lisp | |
| parent | fabcafd5e8100e9ac8bb6b68ccc88df3a1309c7a (diff) | |
emms-i18n-default-coding-system: Change default value from nil to '(no-conversion . no-conversion).
Diffstat (limited to 'lisp')
| -rw-r--r-- | lisp/emms-i18n.el | 4 |
1 files changed, 2 insertions, 2 deletions
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)))) |