Subject: bug#48536: ‘emacs-org-super-agenda’ is broken.

From: Xinglu Chen <[email-masked]>
Date: Thu, 20 May 2021 15:59:03 +0200

Hi,

Commit 71045f4e6425a686667cf30252a2a71cff36308b (“gnu: emacs-org: Update
to 9.4.6.”) seems to break a test in ‘emacs-org-super-agenda’[1], this
also breaks three other packages that depend on it.

Any ideas why this happens?

--8<---------------cut here---------------start------------->8---
Test org-super-agenda-test--:auto-tags backtrace:
  signal(error ("Test failed for body:a5c8edc0db4a93c039964c5762e70...
  error("Test failed for body:%s\nDIFF:\n %s" "a5c8edc0db4a93c039964c5
  (or (equal stored-result new-result) (if (and stored-result new-resu
  (let ((stored-result (gethash body-groups-hash org-super-agenda-test
  (if org-super-agenda-test-show-results nil (let ((stored-result (get
  (let ((body-groups-hash (secure-hash 'md5 (format "%S" (list '(org-a
  (progn (if (> (hash-table-count org-super-agenda-test-results) 0) ni
  (setq value-129 (progn (if (> (hash-table-count org-super-agenda-tes
  (unwind-protect (setq value-129 (progn (if (> (hash-table-count org-
  (if (unwind-protect (setq value-129 (progn (if (> (hash-table-count 
  (let (form-description-130) (if (unwind-protect (setq value-129 (pro
  (let ((value-129 (gensym "ert-form-evaluation-aborted-"))) (let (for
  (closure (t) nil (let ((value-129 (gensym "ert-form-evaluation-abort
  ert--run-test-internal(#s(ert--test-execution-info :test #s(ert-test
  ert-run-test(#s(ert-test :name org-super-agenda-test--:auto-tags :do
  ert-run-or-rerun-test(#s(ert--stats :selector t :tests ... :test-map
  ert-run-tests(t #f(compiled-function (event-type &rest event-args) #
  ert-run-tests-batch(nil)
  ert-run-tests-batch-and-exit()
  command-line-1(("--eval" "(message \"Org version: %s\" (org-version)
  command-line()
  normal-top-level()
Test org-super-agenda-test--:auto-tags condition:
    (error "Test failed for body:a5c8edc0db4a93c039964c5762e70420
DIFF:
 @@ -10,6 +10,12 @@
  Tags: @town, personal
   test:       Scheduled:  TODO [#C] Get haircut                                                                       :personal:@town:
 
+ Tags: Emacs, computers, elisp, programming, software
+  ideas:      Scheduled:  SOMEDAY Rewrite Emacs in Common Lisp                            :Emacs:elisp:computers:software:programming:
+
+ Tags: Emacs, website
+  test:       Deadline:   CHECK /r/emacs                                                                               :website:Emacs:
+
  Tags: ambition, meetings, universe, world
   ambition:   Sched. 1x:  TODO [#A] Skype with president of Antarctica                             :universe:ambition:world::meetings:
 
@@ -35,15 +41,9 @@
  Tags: bills, spaceship
   test:       In  27 d.:  TODO [#A] Spaceship lease                                                                  :bills:spaceship:
 
- Tags: computers, elisp, emacs, programming, software
-  ideas:      Scheduled:  SOMEDAY Rewrite Emacs in Common Lisp                            :Emacs:elisp:computers:software:programming:
-
  Tags: dinner, food
   test:       18:00...... Scheduled:  TODO Order a pizza                                                                 :food:dinner:
 
- Tags: emacs, website
-  test:       Deadline:   CHECK /r/emacs                                                                               :website:Emacs:
-
  Other items
   test:        7:02...... Sunrise (12:04 of daylight)
                8:00...... ----------------
")
   FAILED   7/66  org-super-agenda-test--:auto-tags (0.076881 sec)
--8<---------------cut here---------------end--------------->8---

[1]: https://ci.guix.gnu.org/build/391929/details