diff options
Diffstat (limited to 'lisp/mail/hashcash.el')
| -rw-r--r-- | lisp/mail/hashcash.el | 12 |
1 files changed, 7 insertions, 5 deletions
diff --git a/lisp/mail/hashcash.el b/lisp/mail/hashcash.el index b343a017e34..eebb140088e 100644 --- a/lisp/mail/hashcash.el +++ b/lisp/mail/hashcash.el @@ -1,6 +1,6 @@ ;;; hashcash.el --- Add hashcash payments to email -*- lexical-binding:t -*- -;; Copyright (C) 2003-2005, 2007-2022 Free Software Foundation, Inc. +;; Copyright (C) 2003-2022 Free Software Foundation, Inc. ;; Written by: Paul Foley <mycroft@actrix.gen.nz> (1997-2002) ;; Maintainer: emacs-devel@gnu.org @@ -57,7 +57,7 @@ "The default number of bits to pay to unknown users. If this is zero, no payment header will be generated. See `hashcash-payment-alist'." - :type 'integer + :type 'natnum :group 'hashcash) (defcustom hashcash-payment-alist '() @@ -77,7 +77,7 @@ present, is the string to be hashed; if not present ADDR will be used." (defcustom hashcash-default-accept-payment 20 "The default minimum number of bits to accept on incoming payments." - :type 'integer + :type 'natnum :group 'hashcash) (defcustom hashcash-accept-resources `((,user-mail-address nil)) @@ -95,10 +95,12 @@ If this is not in your PATH, specify an absolute file name." :type '(choice (const nil) file) :group 'hashcash) -(defcustom hashcash-extra-generate-parameters nil +(defcustom hashcash-extra-generate-parameters '("-Z2") "A list of parameter strings passed to `hashcash-program' when minting. -For example, you may want to set this to (\"-Z2\") to reduce header length." +For example, on very old hardware, you may want to set this +to (\"-Z0\") to disable compression." :type '(repeat string) + :version "29.1" :group 'hashcash) (defcustom hashcash-double-spend-database "hashcash.db" |