From: Davor Rotim <rotim.davor@gmail.com>
To: larsi@gnus.org
Cc: 36324@debbugs.gnu.org
Subject: bug#36324: 27.0.50; Error in savehist-save: (wrong-type-argument listp t)
Date: Fri, 21 Jun 2019 21:22:56 +0200 [thread overview]
Message-ID: <CAMWA6ANQCWROKepbAKdXJg1NqpVhj9pX2B56ChTCqdyz4s0umg@mail.gmail.com> (raw)
In-Reply-To: <87zhma9b6v.fsf@web.de>
[-- Attachment #1: Type: text/plain, Size: 5939 bytes --]
I can trigger it reliably using the following skeleton init.el:
(setq savehist-autosave-interval 10)
(savehist-mode)
(setq epg-pinentry-mode 'loopback)
Visiting a test.gpg file and afterwards encrypting it symmetrically
gives the following error:
Debugger entered--Lisp error: (wrong-type-argument listp t)
savehist-save(t)
savehist-autosave()
apply(savehist-autosave nil)
timer-event-handler([t 23821 9812 623801 10 savehist-autosave nil nil
712000])
read-string("Confirm password: " nil t nil)
read-passwd("Confirm password: " nil nil)
read-passwd("Passphrase for symmetric encryption for /home/drot..." t)
epa-passphrase-callback-function(#s(epg-context :protocol OpenPGP
:program "/usr/bin/gpg2" :home-directory nil :armor nil :textmode nil
:include-certs nil :cipher-algorithm nil :digest-algorithm nil
:compress-algorithm nil :passphrase-callback
(epa-file-passphrase-callback-function . "/home/drot/test.gpg")
:progress-callback (epa-progress-callback-function . "Encrypting
/home/drot/test.gpg") :edit-callback nil :signers nil :sig-notations nil
:process #<process epg> :output-file "/tmp/epg-outputk8NwaR" :result nil
:operation encrypt :pinentry-mode loopback :error-output "" :error-buffer
#<buffer *epg-error*>) SYM "/home/drot/test.gpg")
epa-file-passphrase-callback-function(#s(epg-context :protocol OpenPGP
:program "/usr/bin/gpg2" :home-directory nil :armor nil :textmode nil
:include-certs nil :cipher-algorithm nil :digest-algorithm nil
:compress-algorithm nil :passphrase-callback
(epa-file-passphrase-callback-function . "/home/drot/test.gpg")
:progress-callback (epa-progress-callback-function . "Encrypting
/home/drot/test.gpg") :edit-callback nil :signers nil :sig-notations nil
:process #<process epg> :output-file "/tmp/epg-outputk8NwaR" :result nil
:operation encrypt :pinentry-mode loopback :error-output "" :error-buffer
#<buffer *epg-error*>) SYM "/home/drot/test.gpg")
epg--status-GET_HIDDEN(#s(epg-context :protocol OpenPGP :program
"/usr/bin/gpg2" :home-directory nil :armor nil :textmode nil :include-certs
nil :cipher-algorithm nil :digest-algorithm nil :compress-algorithm nil
:passphrase-callback (epa-file-passphrase-callback-function .
"/home/drot/test.gpg") :progress-callback (epa-progress-callback-function .
"Encrypting /home/drot/test.gpg") :edit-callback nil :signers nil
:sig-notations nil :process #<process epg> :output-file
"/tmp/epg-outputk8NwaR" :result nil :operation encrypt :pinentry-mode
loopback :error-output "" :error-buffer #<buffer *epg-error*>)
"passphrase.enter")
epg--process-filter(#<process epg> "[GNUPG:] INQUIRE_MAXLEN 100\n[GNUPG:]
GET_HIDDEN pa...")
accept-process-output(#<process epg> 1)
epg-wait-for-status(#s(epg-context :protocol OpenPGP :program
"/usr/bin/gpg2" :home-directory nil :armor nil :textmode nil :include-certs
nil :cipher-algorithm nil :digest-algorithm nil :compress-algorithm nil
:passphrase-callback (epa-file-passphrase-callback-function .
"/home/drot/test.gpg") :progress-callback (epa-progress-callback-function .
"Encrypting /home/drot/test.gpg") :edit-callback nil :signers nil
:sig-notations nil :process #<process epg> :output-file
"/tmp/epg-outputk8NwaR" :result nil :operation encrypt :pinentry-mode
loopback :error-output "" :error-buffer #<buffer *epg-error*>)
("BEGIN_ENCRYPTION"))
epg-start-encrypt(#s(epg-context :protocol OpenPGP :program
"/usr/bin/gpg2" :home-directory nil :armor nil :textmode nil :include-certs
nil :cipher-algorithm nil :digest-algorithm nil :compress-algorithm nil
:passphrase-callback (epa-file-passphrase-callback-function .
"/home/drot/test.gpg") :progress-callback (epa-progress-callback-function .
"Encrypting /home/drot/test.gpg") :edit-callback nil :signers nil
:sig-notations nil :process #<process epg> :output-file
"/tmp/epg-outputk8NwaR" :result nil :operation encrypt :pinentry-mode
loopback :error-output "" :error-buffer #<buffer *epg-error*>) #s(epg-data
:file nil :string "hello") nil nil nil)
epg-encrypt-string(#s(epg-context :protocol OpenPGP :program
"/usr/bin/gpg2" :home-directory nil :armor nil :textmode nil :include-certs
nil :cipher-algorithm nil :digest-algorithm nil :compress-algorithm nil
:passphrase-callback (epa-file-passphrase-callback-function .
"/home/drot/test.gpg") :progress-callback (epa-progress-callback-function .
"Encrypting /home/drot/test.gpg") :edit-callback nil :signers nil
:sig-notations nil :process #<process epg> :output-file
"/tmp/epg-outputk8NwaR" :result nil :operation encrypt :pinentry-mode
loopback :error-output "" :error-buffer #<buffer *epg-error*>) "hello" nil)
epa-file-write-region(nil nil "/home/drot/test.gpg" nil t "~/test.gpg"
nil)
apply(epa-file-write-region (nil nil "/home/drot/test.gpg" nil t
"~/test.gpg" nil))
epa-file-handler(write-region nil nil "/home/drot/test.gpg" nil t
"~/test.gpg" nil)
write-region(nil nil "/home/drot/test.gpg" nil t "~/test.gpg")
basic-save-buffer-2()
basic-save-buffer-1()
basic-save-buffer(t)
save-buffer(1)
funcall-interactively(save-buffer 1)
call-interactively(save-buffer nil nil)
command-execute(save-buffer)
Attempting to quit Emacs after that gives the following error:
Debugger entered--Lisp error: (wrong-type-argument listp t)
savehist-save(t)
savehist-autosave()
kill-emacs()
save-buffers-kill-emacs(nil)
save-buffers-kill-terminal(nil)
funcall-interactively(save-buffers-kill-terminal nil)
call-interactively(save-buffers-kill-terminal nil nil)
command-execute(save-buffers-kill-terminal)
These errors start to happen every time there's a minibuffer prompt for GPG
decryption.
In GNU Emacs 27.0.50 (build 1, x86_64-pc-linux-gnu, GTK+ Version 3.24.5,
cairo version 1.16.0)
of 2019-06-21 built on lambda
Repository revision: 869cf5cbc0721bbe9e4df557f4ed3633fb13c05f
Repository branch: master
Windowing system distributor 'The X.Org Foundation', version 11.0.12004000
System Description: Debian GNU/Linux 10 (buster)
[-- Attachment #2: Type: text/html, Size: 6855 bytes --]
next prev parent reply other threads:[~2019-06-21 19:22 UTC|newest]
Thread overview: 15+ messages / expand[flat|nested] mbox.gz Atom feed top
2019-06-21 16:04 bug#36324: 27.0.50; Error in savehist-save: (wrong-type-argument listp t) Michael Heerdegen
2019-06-21 16:16 ` Lars Ingebrigtsen
2019-06-21 16:40 ` Michael Heerdegen
2019-06-21 16:50 ` Lars Ingebrigtsen
2019-06-21 17:05 ` Michael Heerdegen
2019-06-21 19:22 ` Davor Rotim [this message]
2019-06-21 23:23 ` Michael Heerdegen
2019-06-22 2:35 ` Michael Heerdegen
2019-06-22 9:33 ` Lars Ingebrigtsen
2019-06-22 15:29 ` Michael Heerdegen
2019-06-22 17:41 ` Noam Postavsky
2019-06-22 17:51 ` Michael Heerdegen
2019-06-23 12:01 ` Lars Ingebrigtsen
2019-06-23 15:27 ` Michael Heerdegen
2019-06-22 9:20 ` Lars Ingebrigtsen
Reply instructions:
You may reply publicly to this message via plain-text email
using any one of the following methods:
* Save the following mbox file, import it into your mail client,
and reply-to-all from there: mbox
Avoid top-posting and favor interleaved quoting:
https://en.wikipedia.org/wiki/Posting_style#Interleaved_style
* Reply using the --to, --cc, and --in-reply-to
switches of git-send-email(1):
git send-email \
--in-reply-to=CAMWA6ANQCWROKepbAKdXJg1NqpVhj9pX2B56ChTCqdyz4s0umg@mail.gmail.com \
--to=rotim.davor@gmail.com \
--cc=36324@debbugs.gnu.org \
--cc=larsi@gnus.org \
/path/to/YOUR_REPLY
https://kernel.org/pub/software/scm/git/docs/git-send-email.html
* If your mail client supports setting the In-Reply-To header
via mailto: links, try the mailto: link
Be sure your reply has a Subject: header at the top and a blank line
before the message body.
Code repositories for project(s) associated with this external index
https://git.savannah.gnu.org/cgit/emacs.git
https://git.savannah.gnu.org/cgit/emacs/org-mode.git
This is an external index of several public inboxes,
see mirroring instructions on how to clone and mirror
all data and code used by this external index.