From: Michael Heerdegen <michael_heerdegen@web.de>
To: Lars Ingebrigtsen <larsi@gnus.org>
Cc: Eric Abrahamsen <eric@ericabrahamsen.net>, 45330@debbugs.gnu.org
Subject: bug#45330: 28.0.50; debbugs-gnu: Can't select reports before having started Gnus
Date: Mon, 21 Dec 2020 08:10:27 +0100 [thread overview]
Message-ID: <87y2hrfxcs.fsf@web.de> (raw)
In-Reply-To: <8735zzhi4w.fsf@gnus.org> (Lars Ingebrigtsen's message of "Mon, 21 Dec 2020 05:56:15 +0100")
Lars Ingebrigtsen <larsi@gnus.org> writes:
> I think this should be fixed on the trunk now -- can you check?
Ok, thanks. Yes, good, though, now I get (deja vu again):
| Debugger entered--Lisp error: (cl-no-applicable-method registry-lookup nil ("<84k479sz16.fsf@aol.com>"))
| signal(cl-no-applicable-method (registry-lookup nil ("<84k479sz16.fsf@aol.com>")))
| cl-no-applicable-method(#s(cl--generic registry-lookup ((1 #s(cl--generic-generalizer cl--generic-t-generalizer 0 #[385 "\300\207" [nil] 3 "\n\n(fn NAME &rest _)"] #[385 "\300\207" [(t)] 3 "\n\n(fn TAG &rest _)"])) (0 #s(cl--generic-generalizer eieio--generic-generalizer 50 cl--generic-struct-tag #[385 "\1\301N\302\1!\10>\205\21\0\303\304\305\3!\"\207" [cl-struct-eieio--class-tags cl--class type-of mapcar eieio--class-name eieio--class-precedence-list] 7 "\n\n(fn TAG &rest _)"]) #s(cl--generic-generalizer cl--generic-t-generalizer 0 #[385 "\300\207" [nil] 3 "\n\n(fn NAME &rest _)"] #[385 "\300\207" [(t)] 3 "\n\n(fn TAG &rest _)"]))) (#s(cl--generic-method (registry-db t) nil nil #[(db keys) "\303\10\301\"\31\304\305\306\307\n\"\")\207" [db data keys eieio-oref delq nil mapcar #[(k) "\302\10\11\"\205\15\0\10\302\10\11\"D\207" [k data gethash] 4]] 5 "Search for KEYS in the registry-db DB.\nReturns an alist of the key followed by the entry in a list, not a cons cell."])) nil) nil ("<84k479sz16.fsf@aol.com>"))
| apply(cl-no-applicable-method #s(cl--generic registry-lookup ((1 #s(cl--generic-generalizer cl--generic-t-generalizer 0 #[385 "\300\207" [nil] 3 "\n\n(fn NAME &rest _)"] #[385 "\300\207" [(t)] 3 "\n\n(fn TAG &rest _)"])) (0 #s(cl--generic-generalizer eieio--generic-generalizer 50 cl--generic-struct-tag #[385 "\1\301N\302\1!\10>\205\21\0\303\304\305\3!\"\207" [cl-struct-eieio--class-tags cl--class type-of mapcar eieio--class-name eieio--class-precedence-list] 7 "\n\n(fn TAG &rest _)"]) #s(cl--generic-generalizer cl--generic-t-generalizer 0 #[385 "\300\207" [nil] 3 "\n\n(fn NAME &rest _)"] #[385 "\300\207" [(t)] 3 "\n\n(fn TAG &rest _)"]))) (#s(cl--generic-method (registry-db t) nil nil #[(db keys) "\303\10\301\"\31\304\305\306\307\n\"\")\207" [db data keys eieio-oref delq nil mapcar #[(k) "\302\10\11\"\205\15\0\10\302\10\11\"D\207" [k data gethash] 4]] 5 "Search for KEYS in the registry-db DB.\nReturns an alist of the key followed by the entry in a list, not a cons cell."])) nil) (nil ("<84k479sz16.fsf@aol.com>")))
| #f(compiled-function (&rest args) #<bytecode 0x306e3026b507eed>)(nil ("<84k479sz16.fsf@aol.com>"))
| apply(#f(compiled-function (&rest args) #<bytecode 0x306e3026b507eed>) nil ("<84k479sz16.fsf@aol.com>"))
| registry-lookup(nil ("<84k479sz16.fsf@aol.com>"))
| gnus-registry-get-or-make-entry("<84k479sz16.fsf@aol.com>" nil)
| gnus-registry-get-id-key("<84k479sz16.fsf@aol.com>" mark)
| gnus-user-format-function-M([2 "bug#10000: 24.0.91; Gnus gnus-get-function error" "nyc4bos@aol.com" #("Tue, 08 Nov 2011 23:25:09 -0500" 0 1 (gnus-time (20154 165))) "<84k479sz16.fsf@aol.com>" nil -1 119 nil ((To . "10000@debbugs.gnu.org"))])
| (format "%c%c%s%s%2s%c%9s %s" gnus-tmp-unread gnus-tmp-replied (gnus-user-format-function-S gnus-tmp-header) (gnus-user-format-function-g gnus-tmp-header) (gnus-user-format-function-M gnus-tmp-header) gnus-tmp-score-char (gnus-user-date (mail-header-date gnus-tmp-header)) gnus-tmp-indentation)
| (insert (format "%c%c%s%s%2s%c%9s %s" gnus-tmp-unread gnus-tmp-replied (gnus-user-format-function-S gnus-tmp-header) (gnus-user-format-function-g gnus-tmp-header) (gnus-user-format-function-M gnus-tmp-header) gnus-tmp-score-char (gnus-user-date (mail-header-date gnus-tmp-header)) gnus-tmp-indentation))
| (progn (insert (format "%c%c%s%s%2s%c%9s %s" gnus-tmp-unread gnus-tmp-replied (gnus-user-format-function-S gnus-tmp-header) (gnus-user-format-function-g gnus-tmp-header) (gnus-user-format-function-M gnus-tmp-header) gnus-tmp-score-char (gnus-user-date (mail-header-date gnus-tmp-header)) gnus-tmp-indentation)) (put-text-property (point) (progn (insert (format "%-23s" (let* ((val ...) (need ...)) (if (> need 0) (concat nil val ...) val)))) (point)) 'mouse-face gnus-mouse-face) (insert " ") (add-text-properties (point) (progn (insert gnus-tmp-subject-or-nil) (point)) (cons 'face (cons (list 'font-lock-variable-name-face 'default) '(gnus-face t)))) (insert "\n"))
| eval((progn (insert (format "%c%c%s%s%2s%c%9s %s" gnus-tmp-unread gnus-tmp-replied (gnus-user-format-function-S gnus-tmp-header) (gnus-user-format-function-g gnus-tmp-header) (gnus-user-format-function-M gnus-tmp-header) gnus-tmp-score-char (gnus-user-date (mail-header-date gnus-tmp-header)) gnus-tmp-indentation)) (put-text-property (point) (progn (insert (format "%-23s" (let* (... ...) (if ... ... val)))) (point)) 'mouse-face gnus-mouse-face) (insert " ") (add-text-properties (point) (progn (insert gnus-tmp-subject-or-nil) (point)) (cons 'face (cons (list 'font-lock-variable-name-face 'default) '(gnus-face t)))) (insert "\n")))
| gnus-summary-prepare-threads((([2 "bug#10000: 24.0.91; Gnus gnus-get-function error" "nyc4bos@aol.com" #("Tue, 08 Nov 2011 23:25:09 -0500" 0 1 (gnus-time (20154 165))) "<84k479sz16.fsf@aol.com>" nil -1 119 nil ((To . "10000@debbugs.gnu.org"))] ([3 "bug#10000: 24.0.91; Gnus gnus-get-function error" "Lars Magne Ingebrigtsen <larsi@gnus.org>" "Sat, 07 Jan 2012 00:34:39 +0100" "<m3boqg5rsg.fsf@stories.gnus.org>" "<84k479sz16.fsf@aol.com>" -1 21 nil ((Cc . "10000@debbugs.gnu.org") (To . "nyc4bos@aol.com"))])) ([4 "control message for bug #10000" "Lars Magne Ingebrigtsen <larsi@gnus.org>" #("Sat, 07 Jan 2012 00:34:43 +0100" 0 1 (gnus-time (20231 34067))) "<m3aa605rsc.fsf@stories.gnus.org>" nil -1 6 nil ((To . "control@debbugs.gnu.org, 10000@debbugs.gnu.org"))]) ([1 "Status: 24.0.91; Gnus gnus-get-function error" "bug#10000 <10000@debbugs.gnu.org>" #("Mon, 21 Dec 2020 07:03:37 +0000" 0 1 (gnus-time (24544 18633))) "fake+none+nndoc+ephemeral:bug#10000+1" nil -1 9 nil ((To . "bug#10000 <10000@debbugs.gnu.org>"))])))
| gnus-summary-prepare()
| gnus-summary-read-group-1("nndoc+ephemeral:bug#10000" t t nil nil nil)
| gnus-summary-read-group("nndoc+ephemeral:bug#10000" t t nil nil nil nil)
| gnus-group-read-group(t t "nndoc+ephemeral:bug#10000" nil)
| gnus-group-read-ephemeral-group("nndoc+ephemeral:bug#10000" (nndoc "/tmp/gnus-temp-group-hZ7CcZ" (nndoc-article-type mbox)) nil (#<buffer *Bugs*> . #<window-configuration>))
| gnus-read-ephemeral-bug-group((10000) "https://debbugs.gnu.org/cgi/bugreport.cgi?bug=%s;m..." (#<buffer *Bugs*> . #<window-configuration>))
| gnus-read-ephemeral-emacs-bug-group((10000) (#<buffer *Bugs*> . #<window-configuration>))
| debbugs-gnu-read-emacs-bug-with-gnus(10000 ((cache_time . 1608534206.8331993) (msgid . "<84k479sz16.fsf@aol.com>") (package "emacs" "gnus") (forwarded) (owner) (tags "notabug") (found_versions "24.0.91") (fixed_date) (fixed_versions) (mergedwith) (last_modified . 1328358242) (done . "Lars Magne Ingebrigtsen <larsi@gnus.org>") (found_date) (affects) (location . "archive") (originator . "nyc4bos@aol.com") (found (item (key . "24.0.91") (value))) (source . "unknown") (keywords "notabug") (subject . "24.0.91; Gnus gnus-get-function error") (bug_num . 10000) (pending . "done") (id . 10000) (blocks) (summary) (log_modified . 1328358242) (fixed) (severity . "minor") (unarchived) (date . 1320812762) (archived . t) (blockedby)) nil)
| debbugs-gnu-select-report()
I have
#+begin_src emacs-lisp
(defalias 'gnus-user-format-function-M
'gnus-registry-article-marks-to-chars)
#+end_src
and am using it in `gnus-summary-line-format'. Can you reproduce that
problem?
Thanks,
Michael.
next prev parent reply other threads:[~2020-12-21 7:10 UTC|newest]
Thread overview: 27+ messages / expand[flat|nested] mbox.gz Atom feed top
2020-12-20 4:53 bug#45330: 28.0.50; debbugs-gnu: Can't select reports before having started Gnus Michael Heerdegen
2020-12-21 4:56 ` Lars Ingebrigtsen
2020-12-21 7:10 ` Michael Heerdegen [this message]
2020-12-21 16:12 ` Eric Abrahamsen
2020-12-22 16:43 ` Eric Abrahamsen
2020-12-23 5:23 ` Michael Heerdegen
2020-12-23 18:08 ` Eric Abrahamsen
2021-12-04 23:18 ` Lars Ingebrigtsen
2021-12-05 0:23 ` Michael Heerdegen
2021-12-05 19:48 ` Lars Ingebrigtsen
2021-12-05 22:18 ` Eric Abrahamsen
2021-12-06 1:14 ` Michael Heerdegen
2021-12-06 1:29 ` Eric Abrahamsen
2021-12-06 5:46 ` Lars Ingebrigtsen
2021-12-06 18:06 ` Eric Abrahamsen
2021-12-06 21:29 ` Michael Heerdegen
2021-12-06 21:45 ` Eric Abrahamsen
2021-12-06 23:01 ` Michael Heerdegen
2021-12-12 2:46 ` Michael Heerdegen
2021-12-23 22:42 ` Eric Abrahamsen
2021-12-31 18:55 ` Michael Heerdegen
2021-12-31 20:43 ` Eric Abrahamsen
2022-01-12 23:06 ` Eric Abrahamsen
2022-01-12 23:07 ` Eric Abrahamsen
2022-01-13 12:43 ` Michael Heerdegen
2022-01-13 19:42 ` Eric Abrahamsen
2022-01-13 21:54 ` Michael Heerdegen
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
List information: https://www.gnu.org/software/emacs/
* Reply using the --to, --cc, and --in-reply-to
switches of git-send-email(1):
git send-email \
--in-reply-to=87y2hrfxcs.fsf@web.de \
--to=michael_heerdegen@web.de \
--cc=45330@debbugs.gnu.org \
--cc=eric@ericabrahamsen.net \
--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 public inbox
https://git.savannah.gnu.org/cgit/emacs.git
This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for read-only IMAP folder(s) and NNTP newsgroup(s).