From cb18631938a612c004872d05ace6720e8209233c Mon Sep 17 00:00:00 2001
From: morioka <morioka>
Date: Mon, 4 May 1998 21:16:19 +0000
Subject: [PATCH] Move definition of constant 'quoted-printable-hex-chars and
 'quoted-printable-octet-regexp to mime-def.el.

---
 eword-decode.el |    5 -----
 mel-q.el        |    7 +------
 2 files changed, 1 insertion(+), 11 deletions(-)

diff --git a/eword-decode.el b/eword-decode.el
index 4d94218..cf7edc7 100644
--- a/eword-decode.el
+++ b/eword-decode.el
@@ -84,11 +84,6 @@
 ;;; @@ Quoted-Printable
 ;;;
 
-(defconst quoted-printable-hex-chars "0123456789ABCDEF")
-(defconst quoted-printable-octet-regexp
-  (concat "=[" quoted-printable-hex-chars
-	  "][" quoted-printable-hex-chars "]"))
-
 (defconst eword-Q-encoded-text-regexp
   (concat "\\([^=?]\\|" quoted-printable-octet-regexp "\\)+"))
 ;; (defconst eword-Q-encoding-and-encoded-text-regexp
diff --git a/mel-q.el b/mel-q.el
index 63d95fb..9a8f954 100644
--- a/mel-q.el
+++ b/mel-q.el
@@ -26,13 +26,12 @@
 ;;; Code:
 
 (require 'emu)
+(require 'mime-def)
 
 
 ;;; @ Quoted-Printable encoder
 ;;;
 
-(defconst quoted-printable-hex-chars "0123456789ABCDEF")
-
 (defsubst quoted-printable-quote-char (character)
   (concat
    "="
@@ -188,10 +187,6 @@ It calls external quoted-printable encoder specified by
 			)))
 	       string "")))
 
-(defconst quoted-printable-octet-regexp
-  (concat "=[" quoted-printable-hex-chars
-	  "][" quoted-printable-hex-chars "]"))
-
 (defun quoted-printable-internal-decode-region (start end)
   (save-excursion
     (save-restriction
-- 
1.7.10.4