From mboxrd@z Thu Jan 1 00:00:00 1970 Return-Path: Received: from mp12.migadu.com ([2001:41d0:2:bcc0::]) (using TLSv1.3 with cipher TLS_AES_256_GCM_SHA384 (256/256 bits)) by ms5.migadu.com with LMTPS id ODk/MZdfOGMdgwEAbAwnHQ (envelope-from ) for ; Sat, 01 Oct 2022 17:41:11 +0200 Received: from aspmx1.migadu.com ([2001:41d0:2:bcc0::]) (using TLSv1.3 with cipher TLS_AES_256_GCM_SHA384 (256/256 bits)) by mp12.migadu.com with LMTPS id gC0/MZdfOGNRuQAAauVa8A (envelope-from ) for ; Sat, 01 Oct 2022 17:41:11 +0200 Received: from lists.gnu.org (lists.gnu.org [209.51.188.17]) (using TLSv1.2 with cipher ECDHE-RSA-AES256-GCM-SHA384 (256/256 bits)) (No client certificate requested) by aspmx1.migadu.com (Postfix) with ESMTPS id 0FCC9154A1 for ; Sat, 1 Oct 2022 17:41:11 +0200 (CEST) Received: from localhost ([::1]:60546 helo=lists1p.gnu.org) by lists.gnu.org with esmtp (Exim 4.90_1) (envelope-from ) id 1oeec2-0008OP-7Z for larch@yhetil.org; Sat, 01 Oct 2022 11:41:10 -0400 Received: from eggs.gnu.org ([2001:470:142:3::10]:59462) by lists.gnu.org with esmtps (TLS1.2:ECDHE_RSA_AES_256_GCM_SHA384:256) (Exim 4.90_1) (envelope-from ) id 1oeebu-0008Mh-1E for guix-patches@gnu.org; Sat, 01 Oct 2022 11:41:02 -0400 Received: from debbugs.gnu.org ([209.51.188.43]:46512) by eggs.gnu.org with esmtps (TLS1.2:ECDHE_RSA_AES_128_GCM_SHA256:128) (Exim 4.90_1) (envelope-from ) id 1oeebt-00007P-PY for guix-patches@gnu.org; Sat, 01 Oct 2022 11:41:01 -0400 Received: from Debian-debbugs by debbugs.gnu.org with local (Exim 4.84_2) (envelope-from ) id 1oeebt-0002l4-L1 for guix-patches@gnu.org; Sat, 01 Oct 2022 11:41:01 -0400 X-Loop: help-debbugs@gnu.org Subject: [bug#56987] [PATCH] added *my-open-bugs functions References: <20220805012310.5999-1-jbranso@dismail.de> In-Reply-To: <20220805012310.5999-1-jbranso@dismail.de> Resent-From: Joshua Branson Original-Sender: "Debbugs-submit" Resent-CC: guix-patches@gnu.org Resent-Date: Sat, 01 Oct 2022 15:41:01 +0000 Resent-Message-ID: Resent-Sender: help-debbugs@gnu.org X-GNU-PR-Message: followup 56987 X-GNU-PR-Package: guix-patches X-GNU-PR-Keywords: patch To: 56987@debbugs.gnu.org Cc: michael.albinus@gmx.de, Joshua Branson Received: via spool by 56987-submit@debbugs.gnu.org id=B56987.166463881310517 (code B ref 56987); Sat, 01 Oct 2022 15:41:01 +0000 Received: (at 56987) by debbugs.gnu.org; 1 Oct 2022 15:40:13 +0000 Received: from localhost ([127.0.0.1]:45590 helo=debbugs.gnu.org) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1oeeb6-0002jX-F3 for submit@debbugs.gnu.org; Sat, 01 Oct 2022 11:40:12 -0400 Received: from mx1.dismail.de ([78.46.223.134]:5480) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1oeeb3-0002jI-Gw for 56987@debbugs.gnu.org; Sat, 01 Oct 2022 11:40:10 -0400 Received: from mx1.dismail.de (localhost [127.0.0.1]) by mx1.dismail.de (OpenSMTPD) with ESMTP id e0070ef4; Sat, 1 Oct 2022 17:40:01 +0200 (CEST) DKIM-Signature: v=1; a=rsa-sha256; c=relaxed; d=dismail.de; h=from:to:cc :subject:date:message-id:mime-version:content-transfer-encoding; s=20190914; bh=UU0+wcV/bmrZLdTObdi5ZCuQvBWCtX5HFXIOgdkb3pk=; b= Op2hzZSIRkQ/NQdjC7kmhNF5DdSJDXdh7OxVbdrSWpvPJXzUVMf73gzd5a9s0OG5 g6Eb+p4yBzSBdyuGGAcz47WN4SvmecDVwFv0H3e4hrKfGK9A2Rz14Z2nR6jB5kTC hHHtDFavKTJmbN8aSUJn2dc3dJXSL8F8e/+5zrQr48HAfjkIX/Bi6QJILrfY7WAm i0WEXcOJAEuwBhop3GJIg9Zw6YsbJJ68P5J6VfaEyn6rDsjd4nKIdqb3HdUBKVoi XpPVE0JL7idjrhWyHKC4J5t8lrfP2Ch6dPElPuJezv73VrHUyEq3cxN1u5DdJWY9 sDeWotJ2AWllYddsgOx5dA== Received: from smtp2.dismail.de ( [10.240.26.12]) by mx1.dismail.de (OpenSMTPD) with ESMTP id 84d1c280; Sat, 1 Oct 2022 17:40:01 +0200 (CEST) Received: from smtp2.dismail.de (localhost [127.0.0.1]) by smtp2.dismail.de (OpenSMTPD) with ESMTP id 2766005e; Sat, 1 Oct 2022 17:40:01 +0200 (CEST) Received: by dismail.de (OpenSMTPD) with ESMTPSA id 34c1a356 (TLSv1.3:TLS_AES_256_GCM_SHA384:256:NO); Sat, 1 Oct 2022 17:40:00 +0200 (CEST) Date: Sat, 1 Oct 2022 11:39:33 -0400 Message-Id: <20221001153933.6325-1-jbranso@dismail.de> X-Mailer: git-send-email 2.37.3 MIME-Version: 1.0 Content-Transfer-Encoding: 8bit X-BeenThere: debbugs-submit@debbugs.gnu.org X-Mailman-Version: 2.1.18 Precedence: list X-BeenThere: guix-patches@gnu.org List-Id: List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Errors-To: guix-patches-bounces+larch=yhetil.org@gnu.org Sender: "Guix-patches" Reply-to: Joshua Branson X-ACL-Warn: , Joshua Branson via Guix-patches From: Joshua Branson via Guix-patches via X-Migadu-Flow: FLOW_IN X-Migadu-Country: US ARC-Message-Signature: i=1; a=rsa-sha256; c=relaxed/relaxed; d=yhetil.org; s=key1; t=1664638871; h=from:from:sender:sender:reply-to:reply-to:subject:subject:date:date: message-id:message-id:to:to:cc:cc:mime-version:mime-version: content-transfer-encoding:content-transfer-encoding:resent-cc: resent-from:resent-sender:resent-message-id:in-reply-to:in-reply-to: references:references:list-id:list-help:list-unsubscribe: list-subscribe:list-post:dkim-signature; bh=FeIs4z+fprZzbfg2MwlljVWeEFD3WZYa9y57kDd5rI8=; b=FGLi1ak+uYX0Ospizz65PGqf0JjcQudI7IxfQZm+pizu34piXQ4Hu8pSPrV9rHwmcNWouH nzm1pH0IZiq/JxFxotlPhEyu2g7y7KsvhsxcqarbSeHwk8oyt5Ln1w9hkcy4A6U01GeN88 jmS4cVbXK1bauVztuiW/u7nMD4abI0uWt+NipskXF23ydcHlHw3CAnBuq9SA7KlVVm0Xut A/81MrhMBm4EQ0ShaEmcODONQLvIX4rvimD0GxgdzilM91EEi6qRa9J715fq2A1hdWmeEW fQPbH0TbnEn3lG3WheOmdlBRMuYlu9bAyLSflV+Fc69rEKL+jAQIK6a54y6+5w== ARC-Seal: i=1; s=key1; d=yhetil.org; t=1664638871; a=rsa-sha256; cv=none; b=OmQf2mtUI1G3lJnUhAXWyoObX8oiIfbigQQdtT/stotE7DZqhne20ybkxMCB0SOJEP9ltS AAJveMGuIFpXa/6S80S/XezJAchV3NbY8MgVse6zjzmGKKswVy45T/AfvNe6bSdL0++ZAP RTFC3gUOizvXGnUO2/kisUVbv6jlk8gmd6LrZeP+qB44tiSQQqAtJNqb8ibMZCHUnlhIaT lr+e6W3jH6g8lBwDI5wyBKuCYz4hGq+SjJWb9GFtTfn/yagJvN/xbhsY5VsdYxs4RI5vQF oyo37/mjd4Ot18qkS/tC/2TZZKZ34/tcd7u38n4wt4WD3dTRBgDBO4FEvV74FQ== ARC-Authentication-Results: i=1; aspmx1.migadu.com; dkim=fail ("headers rsa verify failed") header.d=dismail.de header.s=20190914 header.b=Op2hzZSI; dmarc=pass (policy=none) header.from=gnu.org; spf=pass (aspmx1.migadu.com: domain of "guix-patches-bounces+larch=yhetil.org@gnu.org" designates 209.51.188.17 as permitted sender) smtp.mailfrom="guix-patches-bounces+larch=yhetil.org@gnu.org" X-Migadu-Spam-Score: -3.54 Authentication-Results: aspmx1.migadu.com; dkim=fail ("headers rsa verify failed") header.d=dismail.de header.s=20190914 header.b=Op2hzZSI; dmarc=pass (policy=none) header.from=gnu.org; spf=pass (aspmx1.migadu.com: domain of "guix-patches-bounces+larch=yhetil.org@gnu.org" designates 209.51.188.17 as permitted sender) smtp.mailfrom="guix-patches-bounces+larch=yhetil.org@gnu.org" X-Migadu-Queue-Id: 0FCC9154A1 X-Spam-Score: -3.54 X-Migadu-Scanner: scn0.migadu.com X-TUID: jj8EExPMV9zS * debbugs-gnu.el: debbugs-gnu-my-open-bugs: new procedure. * debbugs-org.el: debbugs-org-my-open-bugs: new procedure. * debbugs-guix.el: debbugs-gnu-guix-search: new procedure. * debugs-ug.texi: added documentation for *my-open-bugs procedures. I did not actually compile the debbugs-ug.text, so it is possible that my documentation makes the info program impossible to compile. Also sorry for the massive delay it has been in sending this in. Thanks, Joshua --- debbugs-gnu.el | 9 +++++++++ debbugs-guix.el | 42 ++++++++++++++++++++++++++++++++++++++++++ debbugs-org.el | 8 ++++++++ debbugs-ug.texi | 13 ++++++++++++- 4 files changed, 71 insertions(+), 1 deletion(-) create mode 100644 debbugs-guix.el diff --git a/debbugs-gnu.el b/debbugs-gnu.el index e6629156c1..29257cb779 100644 --- a/debbugs-gnu.el +++ b/debbugs-gnu.el @@ -827,6 +827,13 @@ Shall be bound in `debbugs-org-*' functions.") (when (called-interactively-p 'interactive) (message "Query finished")))) +;;;###autoload +(defun debbugs-gnu-my-open-bugs () + "Retrieve the open bugs, that you submitted. This function assumes the variable +'user-mail-address' is defined." + (interactive) + (apply #'debbugs-gnu-bugs (debbugs-get-bugs :submitter "me" :status "open"))) + (defun debbugs-gnu-get-bugs (query) "Retrieve bug numbers from debbugs.gnu.org according search criteria." (let* ((debbugs-port "gnu.org") @@ -2479,6 +2486,8 @@ or bug ranges, with default to `debbugs-gnu-default-bug-number-list'." (when (called-interactively-p 'interactive) (message "Retrieving bugs finished"))) +(defalias 'debbugs-gnu-get-bug-by-id 'debbugs-gnu-bugs) + (defcustom debbugs-gnu-trunk-directory "~/src/emacs/trunk/" "The directory where the main source tree lives." :type 'directory diff --git a/debbugs-guix.el b/debbugs-guix.el new file mode 100644 index 0000000000..6f7cfe46e4 --- /dev/null +++ b/debbugs-guix.el @@ -0,0 +1,42 @@ +;;; debbugs-guix.el Guix Specific Debbugs Functions -*- lexical-binding: t; -*- +;; +;; Copyright (C) 2011-2022 Free Software Foundation, Inc. + +;; Author: Joshua Branson +;; Keywords: comm, hypermedia, maint +;; Package: debbugs + +;; This file is not part of GNU Emacs. + +;; This program is free software: you can redistribute it and/or modify +;; it under the terms of the GNU General Public License as published by +;; the Free Software Foundation, either version 3 of the License, or +;; (at your option) any later version. + +;; This program is distributed in the hope that it will be useful, +;; but WITHOUT ANY WARRANTY; without even the implied warranty of +;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the +;; GNU General Public License for more details. + +;; You should have received a copy of the GNU General Public License +;; along with GNU Emacs. If not, see . + +;;; Commentary: +;; +;; By default, debbugs-gnu-search searches for open and closed bugs of +;; all GNU packages, which can make searching a little slow. To +;; remedy this situation, this file provides the function +;; 'debbugs-gnu-guix-search', which search for open bugs that relate +;; to the GNU guix. +;; +;;; Code: + +;;;###autoload +(defun debbugs-gnu-guix-search () + "Search for open guix bugs and patches." + (interactive) + (debbugs-gnu-search (read-string "Search String: ") '((pending . "pending")) + nil '("guix" "guix-patches") nil)) + +(provide 'debbugs-guix) +;;; debbugs-guix.el ends here diff --git a/debbugs-org.el b/debbugs-org.el index c4343ecd8e..33b3662219 100644 --- a/debbugs-org.el +++ b/debbugs-org.el @@ -352,6 +352,14 @@ or bug ranges, with default to `debbugs-gnu-default-bug-number-list'." (let ((debbugs-gnu-show-reports-function #'debbugs-org-show-reports)) (call-interactively #'debbugs-gnu-bugs))) +;;;###autoload +(defun debbugs-org-my-open-bugs () + "Retrieve the open bugs, that you submitted. This function assumes the variable +'user-mail-address' is defined." + (interactive) + (let ((debbugs-gnu-show-reports-function #'debbugs-org-show-reports)) + (apply #'debbugs-gnu-bugs (debbugs-get-bugs :submitter "me" :status "open")))) + ;; TODO ;; - Make headline customizable. diff --git a/debbugs-ug.texi b/debbugs-ug.texi index f1af2a5e6f..bc96c759aa 100644 --- a/debbugs-ug.texi +++ b/debbugs-ug.texi @@ -206,6 +206,18 @@ of bugs you are currently working on. @ref{Presenting Bugs} for the presentation of the results. @end deffn +@deffn {Command} debbugs-gnu-my-open-bugs +@deffnx {Command} debbugs-org-my-open-bugs + +It is a good idea to maintain and eventually close your open bug +reports. The functions @code{debbugs-gnu-my-open-bugs} and +@code{debbugs-org-my-open-bugs} help you do this, by retrieving open +bug reports, in which you are the submitter. These functions assume +that you have defined the variable @code{user-mail-address} +(@pxref{Mail Header Fields, Mail Header Fields, Mail Header Fields, +The Emacs Editor}). +@end deffn + @deffn {Command} debbugs-gnu-emacs-release-blocking-reports &optional release @deffnx {Command} debbugs-org-emacs-release-blocking-reports &optional release @@ -226,7 +238,6 @@ If this user option is non-@code{nil}, a progress report is shown when retrieving bugs, defaults to t. @end defopt - @node Searching Bugs @chapter Searching in the Debbugs Database -- 2.37.3