./ChangeLog:

[gnus] / contrib / hashcash.el

diff --git a/contrib/hashcash.el b/contrib/hashcash.el
index 6f9ee47..3770212 100644 (file)
--- a/contrib/hashcash.el
+++ b/contrib/hashcash.el
@@ -1,6 +1,6 @@
 ;;; hashcash.el --- Add hashcash payments to email
 
-;; $Revision: 1.9 $
+;; $Revision: 1.10 $
 ;; Copyright (C) 1997--2002 Paul E. Foley
 ;; Copyright (C) 2003 Free Software Foundation
 
@@ -60,15 +60,13 @@ is used instead.")
 
 (require 'mail-utils)
 
-(defalias 'hashcash-point-at-bol
-    (if (fboundp 'point-at-bol)
-       'point-at-bol
-       'line-beginning-position))
+(if (fboundp 'point-at-bol)
+    (defalias 'hashcash-point-at-bol 'point-at-bol)
+  (defalias 'hashcash-point-at-bol 'line-beginning-position))
 
-(defalias 'hashcash-point-at-eol
-    (if (fboundp 'point-at-eol)
-       'point-at-eol
-       'line-end-position))
+(if (fboundp 'point-at-eol)
+    (defalias 'hashcash-point-at-eol 'point-at-eol)
+  (defalias 'hashcash-point-at-eol 'line-end-position))
 
 (defun hashcash-strip-quoted-names (addr)
   (setq addr (mail-strip-quoted-names addr))