Subject: Re: bug#36903: 27.0.50; gnus registry vs. debbugs

From: Michael Heerdegen <[email-masked]>
Date: Wed, 25 Sep 2019 11:39:18 +0200

Michael Heerdegen <[email-masked]> writes:

> FWIW, your fix works for me.

Though, today I got this:

Debugger entered--Lisp error: (cl-no-applicable-method registry-lookup nil ("fake+none+nndoc+ephemeral:bug#37321+1"))
  signal(cl-no-applicable-method (registry-lookup nil ("fake+none+nndoc+ephemeral:bug#37321+1")))
  cl-no-applicable-method(#s(cl--generic :name registry-lookup :dispatches ((1 #s(cl--generic-generalizer :name cl--generic-t-generalizer :priority 0 :tagcode-function #f(compiled-function (name &rest _) #<bytecode 0x1fef6cfb0adb>) :specializers-function #f(compiled-function (tag &rest _) #<bytecode 0x1fef6cfb0ac3>))) (0 #s(cl--generic-generalizer :name eieio--generic-generalizer :priority 50 :tagcode-function cl--generic-struct-tag :specializers-function #f(compiled-function (tag &rest _) #<bytecode 0x1584e6ac4ded>)) #s(cl--generic-generalizer :name cl--generic-t-generalizer :priority 0 :tagcode-function #f(compiled-function (name &rest _) #<bytecode 0x1fef6cfb0adb>) :specializers-function #f(compiled-function (tag &rest _) #<bytecode 0x1fef6cfb0ac3>)))) :method-table (#s(cl--generic-method :specializers (registry-db t) :qualifiers nil :uses-cnm nil :function #f(compiled-function (db keys) #<bytecode 0x1584e75f4c5d>))) :options nil) nil ("fake+none+nndoc+ephemeral:bug#37321+1"))
  apply(cl-no-applicable-method #s(cl--generic :name registry-lookup :dispatches ((1 #s(cl--generic-generalizer :name cl--generic-t-generalizer :priority 0 :tagcode-function #f(compiled-function (name &rest _) #<bytecode 0x1fef6cfb0adb>) :specializers-function #f(compiled-function (tag &rest _) #<bytecode 0x1fef6cfb0ac3>))) (0 #s(cl--generic-generalizer :name eieio--generic-generalizer :priority 50 :tagcode-function cl--generic-struct-tag :specializers-function #f(compiled-function (tag &rest _) #<bytecode 0x1584e6ac4ded>)) #s(cl--generic-generalizer :name cl--generic-t-generalizer :priority 0 :tagcode-function #f(compiled-function (name &rest _) #<bytecode 0x1fef6cfb0adb>) :specializers-function #f(compiled-function (tag &rest _) #<bytecode 0x1fef6cfb0ac3>)))) :method-table (#s(cl--generic-method :specializers (registry-db t) :qualifiers nil :uses-cnm nil :function #f(compiled-function (db keys) #<bytecode 0x1584e75f4c5d>))) :options nil) (nil ("fake+none+nndoc+ephemeral:bug#37321+1")))
  #f(compiled-function (&rest args) #<bytecode 0x1584e82451e1>)(nil ("fake+none+nndoc+ephemeral:bug#37321+1"))
  apply(#f(compiled-function (&rest args) #<bytecode 0x1584e82451e1>) nil ("fake+none+nndoc+ephemeral:bug#37321+1"))
  registry-lookup(nil ("fake+none+nndoc+ephemeral:bug#37321+1"))
  gnus-registry-get-or-make-entry("fake+none+nndoc+ephemeral:bug#37321+1")
  gnus-registry-get-id-key("fake+none+nndoc+ephemeral:bug#37321+1" group)
  gnus-registry-register-message-ids()
  run-hooks(gnus-summary-prepare-hook)
  apply(run-hooks gnus-summary-prepare-hook)
  gnus-run-hooks(gnus-summary-prepare-hook)
  gnus-summary-prepare()
  gnus-summary-read-group-1("nndoc+ephemeral:bug#37321" t t nil nil nil)
  gnus-summary-read-group("nndoc+ephemeral:bug#37321" t t nil nil nil nil)
  gnus-group-read-group(t t "nndoc+ephemeral:bug#37321" nil)
  gnus-group-read-ephemeral-group("nndoc+ephemeral:bug#37321" (nndoc "/tmp/gnus-temp-group-s69vaM" (nndoc-article-type mbox)) nil (#<buffer *"gc-cons-percentage" Bugs*> . #<window-configuration>))
  gnus-read-ephemeral-bug-group((37321) "https://debbugs.gnu.org/cgi/bugreport.cgi?bug=%s;m..." (#<buffer *"gc-cons-percentage" Bugs*> . #<window-configuration>))
  gnus-read-ephemeral-emacs-bug-group((37321) (#<buffer *"gc-cons-percentage" Bugs*> . #<window-configuration>))
  debbugs-read-emacs-bug-with-gnus(37321 ((cache_time . 1569404174.2957919) (last_modified . 1569046862) (fixed_date) (date . 1567777982) (source . "unknown") (found_versions "27.0.50") (log_modified . 1569046862) (archived) (affects) (bug_num . 37321) (fixed_versions) (pending . "done") (fixed) (msgid . "<[email-masked]>") (blocks) (subject . "27.0.50; Excessive gc in a use case (el-search)") (location . "db-h") (done . "Paul Eggert <[email-masked]>") (tags) (mergedwith) (found (item (key . "27.0.50") (value))) (package "emacs") (severity . "normal") (unarchived) (originator . "Michael Heerdegen <[email-masked]>") (blockedby) (found_date) (id . 37321) (summary) (owner) (keywords) (forwarded)) nil)
  debbugs-gnu-select-report()
  funcall-interactively(debbugs-gnu-select-report)
  call-interactively(debbugs-gnu-select-report nil nil)
  command-execute(debbugs-gnu-select-report)

Michael.