(base64-dl-module): Must check base64.so actually exists.
authormorioka <morioka>
Fri, 17 Apr 1998 02:07:47 +0000 (02:07 +0000)
committermorioka <morioka>
Fri, 17 Apr 1998 02:07:47 +0000 (02:07 +0000)
mel.el

diff --git a/mel.el b/mel.el
index 50cc8f8..8582c09 100644 (file)
--- a/mel.el
+++ b/mel.el
@@ -41,7 +41,9 @@
 
 (defvar base64-dl-module
   (and (fboundp 'dynamic-link)
-       (expand-file-name "base64.so" exec-directory)))
+       (let ((path (expand-file-name "base64.so" exec-directory)))
+        (and (file-exists-p path)
+             path))))
 
 
 ;;; @ autoload