From: shuhei <shuhei>
Date: Sun, 18 Mar 2001 12:24:46 +0000 (+0000)
Subject: Removed hack for compiler.
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=ad885416c06ae7744f3fdd9cb24a5a63df6b7af9;p=elisp%2Fflim.git

Removed hack for compiler.
(sha1-dl-handle): Do `dynamic-link' unconditionally.
---

diff --git a/sha1-dl.el b/sha1-dl.el
index b60969a..4716d4d 100644
--- a/sha1-dl.el
+++ b/sha1-dl.el
@@ -27,15 +27,10 @@
 ;;; Code:
 
 (provide 'sha1-dl)			; beware of circular dependency.
-(eval-when-compile
-  (require 'sha1)			; sha1-dl-module.
-  (defun-maybe dynamic-link (a))
-  (defun-maybe dynamic-call (a b)))
-
-(defvar sha1-dl-handle
-  (and (stringp sha1-dl-module)
-       (file-exists-p sha1-dl-module)
-       (dynamic-link sha1-dl-module)))
+(eval-when-compile (require 'sha1))	; sha1-dl-module.
+
+;;; This file is loaded (from "sha1.el") only when sha1-dl-module exists.
+(defvar sha1-dl-handle (dynamic-link sha1-dl-module))
 
 ;;; sha1-dl-module provides `sha1-string' and `sha1-binary'.
 (dynamic-call "emacs_sha1_init" sha1-dl-handle)