X-Git-Url: http://git.chise.org/gitweb/?a=blobdiff_plain;f=emu-x20.el;h=e9bffccd50c12b36596a3d67e3a8f0e37b89c0b0;hb=19a055626626c9156970cca280d6b5d7c8e2036a;hp=370c95d2e9b33a4b95db3cee88d56b2da2ed3f06;hpb=6a96af9b09d8204c9457080b2fa8e6f1cd7a8bc7;p=elisp%2Fapel.git diff --git a/emu-x20.el b/emu-x20.el index 370c95d..e9bffcc 100644 --- a/emu-x20.el +++ b/emu-x20.el @@ -70,7 +70,7 @@ find-file-hooks, etc. ;;; @ MIME charset ;;; -(defsubst encode-mime-charset-region (start end charset) +(defun encode-mime-charset-region (start end charset) "Encode the text between START and END as MIME CHARSET." (let ((cs (mime-charset-to-coding-system charset))) (if cs @@ -134,7 +134,7 @@ find-file-hooks, etc. )) (setq rest (cdr rest)))))) -(defsubst decode-mime-charset-region (start end charset) +(defun decode-mime-charset-region (start end charset) "Decode the text between START and END as MIME CHARSET." (if (stringp charset) (setq charset (intern (downcase charset)))