From: shuhei <shuhei>
Date: Sun, 18 Mar 2001 12:24:39 +0000 (+0000)
Subject: (base64-dl-handle): Don't eval at compile-time.
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=7b27699bfec5aa62523caa14107e278711d89210;p=elisp%2Fflim.git

(base64-dl-handle): Don't eval at compile-time.
Don't do `dynamic-call' at compile-time.
---

diff --git a/mel-b-dl.el b/mel-b-dl.el
index 47b1b81..c298b14 100644
--- a/mel-b-dl.el
+++ b/mel-b-dl.el
@@ -26,14 +26,12 @@
 
 (require 'mime-def)
 
-(eval-and-compile
-  (defvar base64-dl-handle
-    (and (stringp base64-dl-module)
-	 (file-exists-p base64-dl-module)
-	 (dynamic-link base64-dl-module)))
-
-  (dynamic-call "emacs_base64_init" base64-dl-handle)
-  )
+(defvar base64-dl-handle
+  (and (stringp base64-dl-module)
+       (file-exists-p base64-dl-module)
+       (dynamic-link base64-dl-module)))
+
+(dynamic-call "emacs_base64_init" base64-dl-handle)
 
 ;; base64-dl-module provides `encode-base64-string' and `decode-base64-string'.
 (defalias 'base64-encode-string 'encode-base64-string)