From: morioka Date: Tue, 23 Jun 1998 01:56:01 +0000 (+0000) Subject: rearrangement. X-Git-Tag: flim-1_6_0~17 X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=30449072f85528407ef146d92eeb9d1012f980e1;p=elisp%2Fflim.git rearrangement. --- diff --git a/mel.el b/mel.el index ca0352d..2ed43a4 100644 --- a/mel.el +++ b/mel.el @@ -147,19 +147,6 @@ STRING is content-transfer-encoding. FUNCTION is region decoder.") ;;;###autoload -(defvar mime-string-decoding-method-alist - '(("base64" . base64-decode-string) - ("quoted-printable" . quoted-printable-decode-string) - ("7bit" . identity) - ("8bit" . identity) - ("binary" . identity) - ) - "Alist of encoding vs. corresponding method to decode string. -Each element looks like (STRING . FUNCTION). -STRING is content-transfer-encoding. -FUNCTION is string decoder.") - -;;;###autoload (defun mime-encode-region (start end encoding) "Encode region START to END of current buffer using ENCODING. ENCODING must be string. If ENCODING is found in @@ -193,6 +180,23 @@ region by its value." (funcall f start end) ))) + +;;; @ string +;;; + +;;;###autoload +(defvar mime-string-decoding-method-alist + '(("base64" . base64-decode-string) + ("quoted-printable" . quoted-printable-decode-string) + ("7bit" . identity) + ("8bit" . identity) + ("binary" . identity) + ) + "Alist of encoding vs. corresponding method to decode string. +Each element looks like (STRING . FUNCTION). +STRING is content-transfer-encoding. +FUNCTION is string decoder.") + ;;;###autoload (defun mime-decode-string (string encoding) "Decode STRING using ENCODING.