Re: gpg.el still not working

[Simon Josefsson <jas@extundo.com>]

Jack Twilley <jmt+usenet@twilley.org> writes:

> Signaling: (wrong-type-argument number-char-or-marker-p nil)
>   >(nil 0)
>   (or (stringp res) (> res 0))
>   (if (or (stringp res) (> res 0)) (with-current-buffer result (insert ...) nil) t)
>   (let* ((msg-file ...) (cmd ...) (args ...) res) (with-temp-file msg-file (buffer-disable-undo) (apply ... ...)) (setq res (apply ... ... ... cmd nil result nil args)) (if (or ... ...) (with-current-buffer result ... nil) t))
>   (progn (gpg-with-temp-files-create 1) (let* (... ... ... res) (with-temp-file msg-file ... ...) (setq res ...) (if ... ... t)))
>   (unwind-protect (progn (gpg-with-temp-files-create 1) (let* ... ... ... ...)) (gpg-with-temp-files-delete))
>   (let ((gpg-temp-files)) (unwind-protect (progn ... ...) (gpg-with-temp-files-delete)))
>   (gpg-with-temp-files 1 (let* (... ... ... res) (with-temp-file msg-file ... ...) (setq res ...) (if ... ... t)))
>   gpg-verify-cleartext(#<buffer " *mm-uu*<2>"> #<buffer "*MML2015 Result*">)

`call-process-region' seem to return nil, but according to the
documentation for that function it should never do this unless buffer
was NIL, which wasn't the case here.  Maybe you can strip down the
code and make a bug report (or discover why this happens)?

> Simon> "grep -e pgp -e gpg -e mailcrypt -e mc .emacs" shows the
> Simon> following for me (I have both gpg.el and mailcrypt installed,
> Simon> and Gnus prefers gpg.el if it finds it, which it does):
>
> Those symbols are only found in my .gnus, not in my .xemacs/init.el:

Ah, I don't have a .gnus, so what I posted was all I used.

>  gnus-use-installed-mailcrypt nil

I don't think that variable exists.

>  gnus-use-mailcrypt nil

Neither does this one.

> (require 'gpg)

This is not necessary if you have gpg in your load-path.

> (require 'bbdb-pgp)
>  bbdb/pgp-default-action 'sign
>  bbdb/pgp-ask nil
> ;(remove-hook 'message-send-hook 'bbdb/pgp-hook-fun)
> ;(add-hook 'message-send-mail-hook 'bbdb/pgp-hook-fun)
> ;					   (mml-secure-message-sign-pgpmime)))))
>    ; (gnus-demon-scan-pgp 180 t)
>  gnus-treat-strip-pgp 'last
>  gpg-command-default-alist '((gpg . "gpg")
> 			     (gpg-2comp . "pgpgpg"))

Hm, are gpg and pgppg in PATH?  Maybe call-process-region returns nil
if the commands aren't found?  For me in Emacs it triggers an error
though, which seems correct.

>  gpg-passphrase-timeout 5
>  gpg-temp-directory "~/.gnupg/tmp"
>  mml2015-use 'gpg

Gpg is the default for mml2015 if it is found, so this shouldn't be
necessary either.