X-Git-Url: http://git.chise.org/gitweb/?a=blobdiff_plain;f=mel-b-dl.el;h=c298b1454405f9a6615eef7750d18edbcf9ca9b0;hb=231ec238a91adb88b8a12f4ab5bc77816774e5bc;hp=59bff297a372c61d298f7265d490f8bd8e119991;hpb=e8b4d182275a38437111e94a864f568dece6ef28;p=elisp%2Fflim.git

diff --git a/mel-b-dl.el b/mel-b-dl.el
index 59bff29..c298b14 100644
--- a/mel-b-dl.el
+++ b/mel-b-dl.el
@@ -1,8 +1,8 @@
 ;;; mel-b-dl.el --- Base64 encoder/decoder using DL module.
 
-;; Copyright (C) 1998 Free Software Foundation, Inc.
+;; Copyright (C) 1998,1999 Free Software Foundation, Inc.
 
-;; Author: MORIOKA Tomohiko <morioka@jaist.ac.jp>
+;; Author: MORIOKA Tomohiko <tomo@m17n.org>
 ;; Keywords: MIME, Base64
 
 ;; This file is part of FLIM (Faithful Library about Internet Message).
@@ -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)))
+(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)
-  )
+(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)