From mboxrd@z Thu Jan 1 00:00:00 1970 Path: news.gmane.io!.POSTED.blaine.gmane.org!not-for-mail From: Morgan Smith Newsgroups: gmane.emacs.bugs Subject: bug#64064: [PATCH 0/4] debbugs improvements Date: Wed, 14 Jun 2023 08:15:57 -0400 Message-ID: Mime-Version: 1.0 Content-Type: multipart/mixed; boundary="=-=-=" Injection-Info: ciao.gmane.io; posting-host="blaine.gmane.org:116.202.254.214"; logging-data="9759"; mail-complaints-to="usenet@ciao.gmane.io" User-Agent: Gnus/5.13 (Gnus v5.13) Cc: Michael Albinus To: 64064@debbugs.gnu.org Original-X-From: bug-gnu-emacs-bounces+geb-bug-gnu-emacs=m.gmane-mx.org@gnu.org Wed Jun 14 14:17:11 2023 Return-path: Envelope-to: geb-bug-gnu-emacs@m.gmane-mx.org Original-Received: from lists.gnu.org ([209.51.188.17]) by ciao.gmane.io with esmtps (TLS1.2:ECDHE_RSA_AES_256_GCM_SHA384:256) (Exim 4.92) (envelope-from ) id 1q9PR0-0002Rf-0t for geb-bug-gnu-emacs@m.gmane-mx.org; Wed, 14 Jun 2023 14:17:10 +0200 Original-Received: from localhost ([::1] helo=lists1p.gnu.org) by lists.gnu.org with esmtp (Exim 4.90_1) (envelope-from ) id 1q9PQu-0001MH-5P; Wed, 14 Jun 2023 08:17:04 -0400 Original-Received: from eggs.gnu.org ([2001:470:142:3::10]) by lists.gnu.org with esmtps (TLS1.2:ECDHE_RSA_AES_256_GCM_SHA384:256) (Exim 4.90_1) (envelope-from ) id 1q9PQs-0001Ly-Uv for bug-gnu-emacs@gnu.org; Wed, 14 Jun 2023 08:17:02 -0400 Original-Received: from debbugs.gnu.org ([209.51.188.43]) by eggs.gnu.org with esmtps (TLS1.2:ECDHE_RSA_AES_128_GCM_SHA256:128) (Exim 4.90_1) (envelope-from ) id 1q9PQs-00067b-L2 for bug-gnu-emacs@gnu.org; Wed, 14 Jun 2023 08:17:02 -0400 Original-Received: from Debian-debbugs by debbugs.gnu.org with local (Exim 4.84_2) (envelope-from ) id 1q9PQs-0002DU-Gj for bug-gnu-emacs@gnu.org; Wed, 14 Jun 2023 08:17:02 -0400 X-Loop: help-debbugs@gnu.org Resent-From: Morgan Smith Original-Sender: "Debbugs-submit" Resent-CC: bug-gnu-emacs@gnu.org Resent-Date: Wed, 14 Jun 2023 12:17:02 +0000 Resent-Message-ID: Resent-Sender: help-debbugs@gnu.org X-GNU-PR-Message: report 64064 X-GNU-PR-Package: emacs X-GNU-PR-Keywords: patch X-Debbugs-Original-To: bug-gnu-emacs@gnu.org Original-Received: via spool by submit@debbugs.gnu.org id=B.16867449808467 (code B ref -1); Wed, 14 Jun 2023 12:17:02 +0000 Original-Received: (at submit) by debbugs.gnu.org; 14 Jun 2023 12:16:20 +0000 Original-Received: from localhost ([127.0.0.1]:43964 helo=debbugs.gnu.org) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1q9PQB-0002CU-FR for submit@debbugs.gnu.org; Wed, 14 Jun 2023 08:16:20 -0400 Original-Received: from lists.gnu.org ([209.51.188.17]:60972) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1q9PQ8-0002CL-Op for submit@debbugs.gnu.org; Wed, 14 Jun 2023 08:16:17 -0400 Original-Received: from eggs.gnu.org ([2001:470:142:3::10]) by lists.gnu.org with esmtps (TLS1.2:ECDHE_RSA_AES_256_GCM_SHA384:256) (Exim 4.90_1) (envelope-from ) id 1q9PQ4-0001Bl-7X for bug-gnu-emacs@gnu.org; Wed, 14 Jun 2023 08:16:13 -0400 Original-Received: from mail-bn7nam10olkn2054.outbound.protection.outlook.com ([40.92.40.54] helo=NAM10-BN7-obe.outbound.protection.outlook.com) by eggs.gnu.org with esmtps (TLS1.2:ECDHE_RSA_AES_256_GCM_SHA384:256) (Exim 4.90_1) (envelope-from ) id 1q9PPy-0005xz-If for bug-gnu-emacs@gnu.org; Wed, 14 Jun 2023 08:16:11 -0400 ARC-Seal: i=1; a=rsa-sha256; s=arcselector9901; d=microsoft.com; cv=none; b=a+hCdfcCqYZjx4NXQglqTxKX7MI0wKi5/l6/45nR32RypXllCdyZpgdy5T+xRjYQgZukUU11z9+4qGde1QKpp50Vu775N9c94z0zB35AjBHnsk0nOBVGx0qz7IEvlrBOPOdu6dVPaAp/N2hvbJKXkKw+bN9p9YpcjsuN4qwuhMoViul73YdDTkK9XwrmHtfeYoSbIxM7qL7nf3fjbpuvDdwjC+B+JStWBvbcMz3u6Dzi++LhP/OtRQL+9DcieCCfMaxTjEMUZMoggQWVYxwCGhYuSb+uBMzTHOg/X8YWToSa5jSPsMWklZOhNT+2Ug8Oc3APOTbmjEiGIuu5sMINeA== ARC-Message-Signature: i=1; a=rsa-sha256; c=relaxed/relaxed; d=microsoft.com; s=arcselector9901; h=From:Date:Subject:Message-ID:Content-Type:MIME-Version:X-MS-Exchange-AntiSpam-MessageData-ChunkCount:X-MS-Exchange-AntiSpam-MessageData-0:X-MS-Exchange-AntiSpam-MessageData-1; bh=WnCmKcDOObymmcl+p6gdk4JOx0M0mQsYkG7pxwexDZA=; b=YfhJO/bcoWOAba+M2MSqk7jA6qOIr+5H/qMwS26M4u93BH9Q/0MmblwAKjs5bmGzffydf8PC7zaJxSrtgE3bsHzuzCdLKmc7P4QG01Vb6v8DId5VzXBU43G1rKrpkYZ4f+NvyZRUbNVpVfxVLjkRlGQ/pZSN2HUHFKQ/d7DZKonLJwZVaQL58yvke/AnGEGnU/QPirx8PEBEST+Ne6p9jdkN3JOOYnR7MzjlwzW4uycyqORm0Oh6I1fQjZ+uC0voi0qk0ynaUgnz8m/pgJvBORUwUiB6XbeHL1hhCPZVnQ0KlKzJTmZBfak3zTChkXmPBqhGTo46EvKVMfGjgrAiMQ== ARC-Authentication-Results: i=1; mx.microsoft.com 1; spf=none; dmarc=none; dkim=none; arc=none DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed; d=outlook.com; s=selector1; h=From:Date:Subject:Message-ID:Content-Type:MIME-Version:X-MS-Exchange-SenderADCheck; bh=WnCmKcDOObymmcl+p6gdk4JOx0M0mQsYkG7pxwexDZA=; b=o0Ogi0RCozD9415AU4RPvXQn3XEbX0bw3r0P4EGHGjtXmHIYUp0yMejCyZ6N0j9T0RICFxmYr3jc+2dNEyVr/z0ES2IDw2HFQyCbK0kySX++6NsHAdVdlybeDXDqjmZD5n+gWSVISxoXwdAxw+bdOy4Owx1bE7OBIjIy1hWAQxYJU/EZhCI0D0U5g0ylwGxmZpyD60iQX5VagrbJql036vsFyrnfx1WnEQeL2OtgdHULioAvKIWDNdtHhz9PvnEpiv7rze4F0BJcriz0BZyqLwkinZ6KGOOe2nd+EvpZyos6euxm77E9EVanJLYcuj04UzQirMXA5Ez+KM9ihwE1zQ== Original-Received: from DM5PR03MB3163.namprd03.prod.outlook.com (2603:10b6:4:40::24) by SA3PR03MB7185.namprd03.prod.outlook.com (2603:10b6:806:2f4::17) with Microsoft SMTP Server (version=TLS1_2, cipher=TLS_ECDHE_RSA_WITH_AES_256_GCM_SHA384) id 15.20.6455.33; Wed, 14 Jun 2023 12:16:02 +0000 Original-Received: from DM5PR03MB3163.namprd03.prod.outlook.com ([fe80::d561:bdf5:3af9:b03e]) by DM5PR03MB3163.namprd03.prod.outlook.com ([fe80::d561:bdf5:3af9:b03e%4]) with mapi id 15.20.6477.037; Wed, 14 Jun 2023 12:16:02 +0000 X-Hashcash: 1:20:230614:bug-gnu-emacs@gnu.org::4ny8uohP05AxKEkc:4Skt X-Hashcash: 1:20:230614:michael.albinus@gmx.de::xuivZdTB1hEW5fOZ:PA6 X-TMN: [J7bykBnMWJF0NzRan8pbnFW92RZatJ+H] X-ClientProxiedBy: YQBPR0101CA0082.CANPRD01.PROD.OUTLOOK.COM (2603:10b6:c01:4::15) To DM5PR03MB3163.namprd03.prod.outlook.com (2603:10b6:4:40::24) X-Microsoft-Original-Message-ID: <87wn06dyte.fsf@outlook.com> X-MS-Exchange-MessageSentRepresentingType: 1 X-MS-PublicTrafficType: Email X-MS-TrafficTypeDiagnostic: DM5PR03MB3163:EE_|SA3PR03MB7185:EE_ X-MS-Office365-Filtering-Correlation-Id: 708b2455-7e3f-4a2f-862c-08db6cd11ec4 X-Microsoft-Antispam: BCL:0; X-Microsoft-Antispam-Message-Info: 5Jc6VIT5JFhWv6hlZu0EvBPtRTO3NeRt7ApK+m0mJiPRzUccNSoel2/NEnXT+yF3Y1IfH7uFmHRaLWC3qRjzo6iZi1oQk+xQit0XjJzc9KXXq6bj3GU6oS+D5EBjLGFtbRwfj+FtXF960c7XzJ4XE1W+DivJr9OnE9hkVnqk//FK+e8RtH8lq7Sr/NE6bNkn8FIZhtp6JjkusI+S3+VGv1GUjcgzye0cIvBj/GBGxCSW/XVoMrXsb1j+bNXnXX+68y2Ay4oCrp8msHKJ+9t4GyeH55ulEgtmQAkVgKqnHtsGk4Ne42lCJN36MGOOoZoPXo9Y5Igjz3PALyc947YIgGllOBTIOozNbfs8rq6muLdxX3ozIO1Oxf1ZH+uiYm6W1tYmBufnVXIQI23YsXPqYmt0yvY0CsgSWPfnutbfiXdN2uLENEiQqMsLWH9eOa7Uxjr10KjN+LSTOa6qUoEKdGVG0CT2APuqKynN5q0VmNRSs7/KBw4TH8uY+WD0lsWceEXC8DBy4e4JnsLTldA2+UibDz2Bsib1Xo58WB+HO+b0XoZIsEChNPvctbdeK/VM X-MS-Exchange-AntiSpam-MessageData-ChunkCount: 1 X-MS-Exchange-AntiSpam-MessageData-0: dwE5gN9mRi+fwXNKJsUsA63I3GMrVxXrNIVNac4hi8f87RjnNAz7rR4oPN6jTHiXdDxTFvPDjHg9I8iFBw+ws3LkW/jguL/q6XpIHJTUM/SyKDln/PqUyHsrxdn2EwHeL0gkYghM9UeuAFucvTDIyNf9bPLjmqIG3kRq0KscOLDOh6h/NE70MZ7TgaaihFNvP9tuJZfnzS1az9q6XTiIVQky+RVfcccfFjhS5jJJitbUW8oyhAd0klu80ZHGUERQypMs+EXkKpipcrCKr80b4+N4Bxi0OgcrBRXSuhlItu3hJG0zWNavfBm+VTLrRDHymVYxiko1/s4j75xhl8U2qUE641jYag8yAJagAeOQeLqMJZlWGez7Bko3vQ1+5In4vwSynHNmNgwyaB3hfws9q9jiARzK/tvPa4KLAwrXp69+QHGtsuQkQ1Lf9GpSxk3WV3315hPHyOUg7UiDGk7WkVW41vCNxm1aCYpTvKor7eWIr4jZKjMSNHB4a0tJpJp3IIYMD7TYOrnAoGGq/qdQ/sCfC1ZRBXvdzeR+Gm3sQcx84sy3k2AVVIhA0NmuLsYDOGIhGJbj7RUslHjYJ6NIYf7VDzNPBovV+OptxSF+0dZxs882xwIhz3hJqDJMrXNB9Siojs9YWxIluRQi+FCw+NKBCjz9svv/MvEbjPu7tCvQ8k1ceWjFbzSAANJUmtX2IP1YGbRNUFUhab5eNeqAvBsN2S/SZhUdwjGbgzxBn+aaB33Ixc1QvmEE6H 2u1RKgerplisVE+SpH4ZZO4PW2nmeb0NOzQRD6ipKCDmuUEXbixoKDdMPs1rHXRxVg6fhH3ucMBzV1knXxfacqM/yy0kcD/zbN X-OriginatorOrg: outlook.com X-MS-Exchange-CrossTenant-Network-Message-Id: 708b2455-7e3f-4a2f-862c-08db6cd11ec4 X-MS-Exchange-CrossTenant-AuthSource: DM5PR03MB3163.namprd03.prod.outlook.com X-MS-Exchange-CrossTenant-AuthAs: Internal X-MS-Exchange-CrossTenant-OriginalArrivalTime: 14 Jun 2023 12:16:02.7809 (UTC) X-MS-Exchange-CrossTenant-FromEntityHeader: Hosted X-MS-Exchange-CrossTenant-Id: 84df9e7f-e9f6-40af-b435-aaaaaaaaaaaa X-MS-Exchange-CrossTenant-RMS-PersistedConsumerOrg: 00000000-0000-0000-0000-000000000000 X-MS-Exchange-Transport-CrossTenantHeadersStamped: SA3PR03MB7185 Received-SPF: pass client-ip=40.92.40.54; envelope-from=Morgan.J.Smith@outlook.com; helo=NAM10-BN7-obe.outbound.protection.outlook.com X-Spam_score_int: -20 X-Spam_score: -2.1 X-Spam_bar: -- X-Spam_report: (-2.1 / 5.0 requ) BAYES_00=-1.9, DKIM_SIGNED=0.1, DKIM_VALID=-0.1, DKIM_VALID_AU=-0.1, DKIM_VALID_EF=-0.1, FREEMAIL_FROM=0.001, RCVD_IN_DNSWL_NONE=-0.0001, RCVD_IN_MSPIKE_H2=-0.001, SPF_HELO_PASS=-0.001, SPF_PASS=-0.001, T_SCC_BODY_TEXT_LINE=-0.01 autolearn=ham autolearn_force=no X-Spam_action: no action X-BeenThere: debbugs-submit@debbugs.gnu.org X-Mailman-Version: 2.1.18 Precedence: list X-BeenThere: bug-gnu-emacs@gnu.org List-Id: "Bug reports for GNU Emacs, the Swiss army knife of text editors" List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Errors-To: bug-gnu-emacs-bounces+geb-bug-gnu-emacs=m.gmane-mx.org@gnu.org Original-Sender: bug-gnu-emacs-bounces+geb-bug-gnu-emacs=m.gmane-mx.org@gnu.org Xref: news.gmane.io gmane.emacs.bugs:263369 Archived-At: --=-=-= Content-Type: text/plain Hello! These patches enable the use of some more 'tabulated-list' functions like 'tabulated-list-sort' (bound to "S"). You may or may not want to install the last patch. It does add potential network calls to the 'revert-buffer' function. If there are legitimate reasons to revert the buffer without fetching new bugs then people might not like that change. Morgan Smith (4): Call 'tabulated-list-print-entry' in 'debbugs-gnu-print-entry'. Don't error out on 'nil' alist value. Don't sort bugs in 'debbugs-gnu-show-reports'. Add 'debbugs-gnu-rescan' to 'tabulated-list-revert-hook'. debbugs-gnu.el | 62 +++++++++----------------------------------------- 1 file changed, 11 insertions(+), 51 deletions(-) --=-=-= Content-Type: text/x-patch Content-Disposition: attachment; filename=0001-Call-tabulated-list-print-entry-in-debbugs-gnu-print.patch >From f64d98ea82cfc999fc6eb644696dc2a0f6f100ec Mon Sep 17 00:00:00 2001 From: Morgan Smith Date: Mon, 12 Jun 2023 20:12:11 -0400 Subject: [PATCH 1/4] Call 'tabulated-list-print-entry' in 'debbugs-gnu-print-entry'. Some of the features of 'tabulated-list' (tabulated-list-next-column, tabulated-list-sort) didn't work properly because 'debbugs-gnu-print-entry' didn't set the 'tabulated-list-column-name' text property. Instead of trying to duplicate code we can simply call 'tabulated-list-print-entry'. * debbugs-gnu.el (debbugs-gnu-print-entry): Remove all printing logic and replace with a call to 'tabulated-list-print-entry'. --- debbugs-gnu.el | 40 ++-------------------------------------- 1 file changed, 2 insertions(+), 38 deletions(-) diff --git a/debbugs-gnu.el b/debbugs-gnu.el index 337c7cbb9a..2c76a3361b 100644 --- a/debbugs-gnu.el +++ b/debbugs-gnu.el @@ -1052,18 +1052,7 @@ are taken from the cache instead." (defun debbugs-gnu-print-entry (list-id cols) "Insert a debbugs entry at point. Used instead of `tabulated-list-print-entry'." - (let ((beg (point)) - (pos 0) - (case-fold-search t) - (id (aref cols 0)) - (id-length (nth 1 (aref tabulated-list-format 0))) - (state (aref cols 1)) - (state-length (nth 1 (aref tabulated-list-format 1))) - (submitter (aref cols 2)) - (submitter-length (nth 1 (aref tabulated-list-format 2))) - (title (aref cols 3)) - ;; (title-length (nth 1 (aref tabulated-list-format 3))) - ) + (let ((case-fold-search t)) (when (and ;; We may have a narrowing in effect. (or (not debbugs-gnu-limit) @@ -1090,32 +1079,7 @@ Used instead of `tabulated-list-print-entry'." (> (cddr check) val))) (throw :suppress t)))))))) - ;; Insert id. - (indent-to (- id-length (length id))) - (insert id) - ;; Insert state. - (indent-to (setq pos (+ pos id-length 1)) 1) - (insert (if (> (length state) state-length) - (propertize (substring state 0 state-length) - 'help-echo state) - state)) - ;; Insert submitter. - (indent-to (setq pos (+ pos state-length 1)) 1) - (insert (if (> (length submitter) submitter-length) - (propertize (substring submitter 0 submitter-length) - 'help-echo submitter) - submitter)) - (indent-to (+ pos (1- submitter-length))) - ;; Insert title. - (indent-to (setq pos (+ pos submitter-length 1)) 1) - (insert (propertize title 'help-echo title)) - ;; Add properties. - (add-text-properties - beg (point) - `(tabulated-list-id ,list-id - tabulated-list-entry ,cols - mouse-face highlight)) - (insert ?\n)))) + (tabulated-list-print-entry list-id cols)))) (defun debbugs-gnu-menu-map-emacs-enabled () "Whether \"Show Release Blocking Bugs\" is enabled in the menu." -- 2.40.1 --=-=-= Content-Type: text/x-patch Content-Disposition: attachment; filename=0002-Don-t-error-out-on-nil-alist-value.patch >From 54a3e56379308c05a9ac6646160d136a26044b95 Mon Sep 17 00:00:00 2001 From: Morgan Smith Date: Mon, 12 Jun 2023 19:56:50 -0400 Subject: [PATCH 2/4] Don't error out on 'nil' alist value. The intention of the DEFAULT argument to alist-get is to return "" instead of 'nil'. However, this still returns 'nil' if the key exists but the value is 'nil'. This problem wasn't detected previously since the functions 'debbugs-gnu-sort-submitter' and 'debbugs-gnu-sort-title' weren't actually used until the previous commit. * debbugs-gnu.el (debbugs-gnu-print-entry): (debbugs-gnu-sort-submitter): (debbugs-gnu-sort-title): Remove DEFAULT argument of alist-get and instead wrap call with 'or' to return default. --- debbugs-gnu.el | 14 +++++++------- 1 file changed, 7 insertions(+), 7 deletions(-) diff --git a/debbugs-gnu.el b/debbugs-gnu.el index 2c76a3361b..c28a4aa5e4 100644 --- a/debbugs-gnu.el +++ b/debbugs-gnu.el @@ -1062,7 +1062,7 @@ Used instead of `tabulated-list-print-entry'." (not (catch :suppress (dolist (check debbugs-gnu-default-suppress-bugs) (when (string-match - (cdr check) (alist-get (car check) list-id "")) + (cdr check) (or (alist-get (car check) list-id) "")) (throw :suppress t)))))) ;; Filter search list. (not (catch :suppress @@ -1288,10 +1288,10 @@ Interactively, it is non-nil with the prefix argument." (defun debbugs-gnu-sort-submitter (s1 s2) (let ((address1 (debbugs-gnu--split-address - (decode-coding-string (alist-get 'originator (car s1) "") 'utf-8))) + (decode-coding-string (or (alist-get 'originator (car s1)) "") 'utf-8))) (address2 (debbugs-gnu--split-address - (decode-coding-string (alist-get 'originator (car s2) "") 'utf-8)))) + (decode-coding-string (or (alist-get 'originator (car s2)) "") 'utf-8)))) (cond ;; Bugs I'm the originator of go to the beginning. ((and (string-equal user-mail-address (car address1)) @@ -1309,14 +1309,14 @@ Interactively, it is non-nil with the prefix argument." (defun debbugs-gnu-sort-title (s1 s2) (let ((owner1 (car (debbugs-gnu--split-address - (decode-coding-string (alist-get 'owner (car s1) "") 'utf-8)))) + (decode-coding-string (or (alist-get 'owner (car s1)) "") 'utf-8)))) (subject1 - (decode-coding-string (alist-get 'subject (car s1) "") 'utf-8)) + (decode-coding-string (or (alist-get 'subject (car s1)) "") 'utf-8)) (owner2 (car (debbugs-gnu--split-address - (decode-coding-string (alist-get 'owner (car s2) "") 'utf-8)))) + (decode-coding-string (or (alist-get 'owner (car s2)) "") 'utf-8)))) (subject2 - (decode-coding-string (alist-get 'subject (car s2) "") 'utf-8))) + (decode-coding-string (or (alist-get 'subject (car s2)) "") 'utf-8))) (cond ;; Bugs I'm the owner of go to the beginning. ((and (string-equal user-mail-address owner1) -- 2.40.1 --=-=-= Content-Type: text/x-patch Content-Disposition: attachment; filename=0003-Don-t-sort-bugs-in-debbugs-gnu-show-reports.patch >From 550385aeb852ad30bb18d341d475f65ec613fdaf Mon Sep 17 00:00:00 2001 From: Morgan Smith Date: Mon, 12 Jun 2023 20:13:53 -0400 Subject: [PATCH 3/4] Don't sort bugs in 'debbugs-gnu-show-reports'. Everything is automatically sorted by 'tabulated-list-mode' according to 'tabulated-list-sort-key' which we already set to the id. * debbugs-gnu.el (debbugs-gnu-show-reports): Don't sort the bugs. --- debbugs-gnu.el | 7 +------ 1 file changed, 1 insertion(+), 6 deletions(-) diff --git a/debbugs-gnu.el b/debbugs-gnu.el index c28a4aa5e4..c65ea3e827 100644 --- a/debbugs-gnu.el +++ b/debbugs-gnu.el @@ -923,7 +923,6 @@ are taken from the cache instead." ;; Print bug reports. (dolist (status - (sort (let ((debbugs-cache-expiry (if offline nil debbugs-cache-expiry)) ids) (apply #'debbugs-get-status @@ -933,11 +932,7 @@ are taken from the cache instead." (push key ids)) debbugs-cache-data) ids) - (debbugs-gnu-get-bugs debbugs-gnu-local-query)))) - ;; Sort so that if a new report gets merged with an old - ;; report, it shows up under the new report. - (lambda (s1 s2) - (> (alist-get 'id s1) (alist-get 'id s2))))) + (debbugs-gnu-get-bugs debbugs-gnu-local-query))))) (let* ((id (alist-get 'id status)) (words (cons (alist-get 'severity status) (alist-get 'keywords status))) -- 2.40.1 --=-=-= Content-Type: text/x-patch Content-Disposition: attachment; filename=0004-Add-debbugs-gnu-rescan-to-tabulated-list-revert-hook.patch >From 5526b57121df84a9db6fd8f14771b01ee2e2cddc Mon Sep 17 00:00:00 2001 From: Morgan Smith Date: Mon, 12 Jun 2023 20:18:38 -0400 Subject: [PATCH 4/4] Add 'debbugs-gnu-rescan' to 'tabulated-list-revert-hook'. This now fetches new bugs when the buffer is reverted. * debbugs-gnu.el (debbugs-gnu-mode): Add 'debbugs-gnu-rescan' to 'tabulated-list-revert-hook'. --- debbugs-gnu.el | 1 + 1 file changed, 1 insertion(+) diff --git a/debbugs-gnu.el b/debbugs-gnu.el index c65ea3e827..df651f3f2f 100644 --- a/debbugs-gnu.el +++ b/debbugs-gnu.el @@ -1221,6 +1221,7 @@ Interactively, it is non-nil with the prefix argument." ("Title" 10 debbugs-gnu-sort-title)]) (setq tabulated-list-sort-key (cons "Id" nil)) (setq tabulated-list-printer #'debbugs-gnu-print-entry) + (add-hook 'tabulated-list-revert-hook #'debbugs-gnu-rescan nil t) (buffer-disable-undo) (setq truncate-lines t) (setq buffer-read-only t)) -- 2.40.1 --=-=-=--