From: okada <okada>
Date: Sun, 23 Jan 2000 00:49:08 +0000 (+0000)
Subject:         * sha1.el (TopLevel): Defun-maybe `sha1-string' when compile.
X-Git-Tag: slim-1_13_7~10
X-Git-Url: http://git.chise.org/gitweb/?p=elisp%2Fflim.git;a=commitdiff_plain;h=7c62ec96fa203799c1d9a13ce67f84e5faa50a8f

    * sha1.el (TopLevel): Defun-maybe `sha1-string' when compile.
---

diff --git a/ChangeLog b/ChangeLog
index 6bd6680..8f1481e 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,5 +1,9 @@
 2000-01-23  Kenichi OKADA <okada@opaopa.org>
 
+	* sha1.el (TopLevel): Defun-maybe `sha1-string' when compile.
+
+2000-01-23  Kenichi OKADA <okada@opaopa.org>
+
 	* smtp.el (smtp-auth-digest-md5): Don't save insecure words.
 
 2000-01-22  Kenichi OKADA <okada@opaopa.org>
diff --git a/sha1.el b/sha1.el
index ad25316..a7265b6 100644
--- a/sha1.el
+++ b/sha1.el
@@ -42,6 +42,9 @@
 
 (require 'hex-util)
 
+(eval-when-compile
+  (defun-maybe sha1-string (a)))
+
 (defvar sha1-dl-module
   (if (and (fboundp 'sha1-string)
 	   (subrp (symbol-function 'sha1-string)))