From 57d288d8198704d7140e200f76709bd77cd32a03 Mon Sep 17 00:00:00 2001 From: shuhei-k Date: Tue, 27 Apr 1999 14:48:43 +0000 Subject: [PATCH] (TopLevel): Suppress warning. --- mel-b-ccl.el | 4 ++++ mel-q-ccl.el | 4 ++++ mime.el | 4 +++- 3 files changed, 11 insertions(+), 1 deletion(-) diff --git a/mel-b-ccl.el b/mel-b-ccl.el index d881240..02fd3e3 100644 --- a/mel-b-ccl.el +++ b/mel-b-ccl.el @@ -105,6 +105,10 @@ abcdefghijklmnopqrstuvwxyz\ (logand v (lsh 255 8)) (lsh (logand v 255) 16))) +) + +(eval-when-compile + (defconst mel-ccl-decode-b-0-table (vconcat (mapcar diff --git a/mel-q-ccl.el b/mel-q-ccl.el index 7ad5a0d..dc84735 100644 --- a/mel-q-ccl.el +++ b/mel-q-ccl.el @@ -248,6 +248,10 @@ abcdefghijklmnopqrstuvwxyz\ ,succ ,fail-crlf)))) +) + +(eval-when-compile + ;; Generated CCL program works not properly on 20.2 because CCL_EOF_BLOCK ;; is not executed. (defun mel-ccl-encode-quoted-printable-generic (input-crlf output-crlf) diff --git a/mime.el b/mime.el index a2f4fec..ce23631 100644 --- a/mime.el +++ b/mime.el @@ -29,10 +29,11 @@ (require 'mime-def) (require 'eword-decode) +(eval-and-compile + (autoload 'eword-encode-header "eword-encode" "Encode header fields to network representation, such as MIME encoded-word.") - (autoload 'mime-parse-Content-Type "mime-parse" "Parse STRING as field-body of Content-Type field.") (autoload 'mime-read-Content-Type "mime-parse" @@ -60,6 +61,7 @@ current-buffer, and return it.") (autoload 'mime-parse-buffer "mime-parse" "Parse BUFFER as a MIME message.") +) ;;; @ Entity Representation and Implementation ;;; -- 1.7.10.4