[hashcash] Re: emacs hashcash.el (Re: Re: Mutt and hashcash)

I looked into this, and here's what happened.  The tool originally
used to by default mint hashcash.  At some point I introduced the -m
option which explicitly requests minting, and then later changed so
the default mint (no -m) did not work and gave usage instead.

So it was the -m you added.

I've changed the behavior back so as of 0.31 (not released yet) so
this will work again.  (Logic: no action requested, default to minting
a token rather than giving usage).

But hashcash.el could be updated to add -m to that command, and that
would be safe also and work with older versions.

Adam

On Tue, Mar 09, 2004 at 02:53:09PM -0500, Hubert Chan wrote:
> Adam> But Hubert said he used emacs gnus, perhaps emacs hashcash.el and
> Adam> emacs mail/news framework it hooks into might be flexible enough
> Adam> to grab the addresses when they're entered, or the reply fields
> Adam> are copied from the message being replied to or something.
> 
> It's pretty simple.  I just have these lines in my .gnus:
> 
> (require 'hashcash)
> (add-hook 'message-send-hook 'mail-add-payment)
> (setq hashcash-default-payment 20)
> (setq hashcash-path "/usr/bin/hashcash")
> 
> BTW, Paul.  For the version of hashcash.el that I have, I had to change
> the hashcash-generate-payment function to:
> 
> (defun hashcash-generate-payment (str val)
>   "Generate a hashcash payment by finding a VAL-bit collison on STR."
>   (if (> val 0)
>       (save-excursion
>       (set-buffer (get-buffer-create " *hashcash*"))
>       (erase-buffer)
>       (call-process hashcash-path nil t nil
>                     "-m" "-b" (number-to-string val) "-q" str)
>       (goto-char (point-min))
>       (buffer-substring (hashcash-point-at-bol) (hashcash-point-at-eol)))
>     nil))
> 
> because something in the interface changed.  IIRC, I just added the -q
> switch, because otherwise hashcash spit out some extra stuff that
> confused hashcash.el.  I don't know if this has been fixed in the
> latest version of hashcash.el.
> 
> -- 
> Hubert Chan <hubert@xxxxxxxxx> - http://www.uhoreg.ca/
> PGP/GnuPG key: 1024D/124B61FA
> Fingerprint: 96C5 012F 5F74 A5F7 1FF7  5291 AF29 C719 124B 61FA
> Key available at wwwkeys.pgp.net.   Encrypted e-mail preferred.
> 


On Tue, Mar 09, 2004 at 02:53:09PM -0500, Hubert Chan wrote:
> It's pretty simple.  I just have these lines in my .gnus:
> 
> (require 'hashcash)
> (add-hook 'message-send-hook 'mail-add-payment)
> (setq hashcash-default-payment 20)
> (setq hashcash-path "/usr/bin/hashcash")
> 
> BTW, Paul.  For the version of hashcash.el that I have, I had to change
> the hashcash-generate-payment function to:
> 
> (defun hashcash-generate-payment (str val)
>   "Generate a hashcash payment by finding a VAL-bit collison on STR."
>   (if (> val 0)
>       (save-excursion
>       (set-buffer (get-buffer-create " *hashcash*"))
>       (erase-buffer)
>       (call-process hashcash-path nil t nil
>                     "-m" "-b" (number-to-string val) "-q" str)
>       (goto-char (point-min))
>       (buffer-substring (hashcash-point-at-bol) (hashcash-point-at-eol)))
>     nil))
> 
> because something in the interface changed.  IIRC, I just added the -q
> switch, because otherwise hashcash spit out some extra stuff that
> confused hashcash.el.  I don't know if this has been fixed in the
> latest version of hashcash.el.
> 
> -- 
> Hubert Chan <hubert@xxxxxxxxx> - http://www.uhoreg.ca/
> PGP/GnuPG key: 1024D/124B61FA
> Fingerprint: 96C5 012F 5F74 A5F7 1FF7  5291 AF29 C719 124B 61FA
> Key available at wwwkeys.pgp.net.   Encrypted e-mail preferred.
>

Other related posts: