[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[elpa] externals/debbugs e794c6c 104/311: Adapt copyright years.
From: |
Stefan Monnier |
Subject: |
[elpa] externals/debbugs e794c6c 104/311: Adapt copyright years. |
Date: |
Sun, 29 Nov 2020 18:41:50 -0500 (EST) |
branch: externals/debbugs
commit e794c6ce597436ae00b482318d8b5f52ebcdd3ac
Author: Michael Albinus <michael.albinus@gmx.de>
Commit: Michael Albinus <michael.albinus@gmx.de>
Adapt copyright years.
* debbugs-gnu.el (debbugs-gnu-default-packages): Extend list of packages.
(debbugs-gnu-get-bugs): Support 'bugs query.
(debbugs-gnu-usertags): Simplify implementation.
(debbugs-gnu-bugs): New defun.
---
Debbugs.wsdl | 2 +-
debbugs-gnu.el | 48 +++++++++++++++++++++++++++++++++++++-----------
debbugs.el | 2 +-
debbugs.texi | 2 +-
4 files changed, 40 insertions(+), 14 deletions(-)
diff --git a/Debbugs.wsdl b/Debbugs.wsdl
index 7c266fc..ad5e954 100644
--- a/Debbugs.wsdl
+++ b/Debbugs.wsdl
@@ -1,6 +1,6 @@
<?xml version="1.0" encoding="UTF-8"?>
-<!-- Copyright (C) 2011, 2012 Free Software Foundation, Inc.
+<!-- Copyright (C) 2011-2013 Free Software Foundation, Inc.
This file is part of GNU Emacs.
diff --git a/debbugs-gnu.el b/debbugs-gnu.el
index 4b82740..d8c0fa6 100644
--- a/debbugs-gnu.el
+++ b/debbugs-gnu.el
@@ -1,6 +1,6 @@
;;; debbugs-gnu.el --- interface for the GNU bug tracker
-;; Copyright (C) 2011, 2012 Free Software Foundation, Inc.
+;; Copyright (C) 2011-2013 Free Software Foundation, Inc.
;; Author: Lars Magne Ingebrigtsen <larsi@gnus.org>
;; Keywords: comm, hypermedia, maint
@@ -35,6 +35,7 @@
;; (autoload 'debbugs-gnu "debbugs-gnu" "" 'interactive)
;; (autoload 'debbugs-gnu-search "debbugs-gnu" "" 'interactive)
;; (autoload 'debbugs-gnu-usertags "debbugs-gnu" "" 'interactive)
+;; (autoload 'debbugs-gnu-bugs "debbugs-gnu" "" 'interactive)
;; The bug tracker is called interactively by
;;
@@ -125,6 +126,13 @@
;; all users who have tagged bugs. This list can be retrieved via
;; <http://debbugs.gnu.org/cgi/pkgindex.cgi?indexon=users>.
+;; Finally, if you simply want to list some bugs with known bug
+;; numbers, call the command
+;;
+;; M-x debbugs-gnu-bugs
+
+;; The bug numbers to be shown shall be entered as comma separated list.
+
;;; Code:
(require 'debbugs)
@@ -163,8 +171,10 @@
(defcustom debbugs-gnu-default-packages '("emacs")
"*The list of packages to be searched for."
;; <http://debbugs.gnu.org/Packages.html>
+ ;; <http://debbugs.gnu.org/cgi/pkgindex.cgi>
:group 'debbugs-gnu
:type '(set (const "automake")
+ (const "cc-mode")
(const "coreutils")
(const "debbugs.gnu.org")
(const "emacs")
@@ -173,8 +183,11 @@
(const "gnus")
(const "guile")
(const "libtool")
+ (const "ns")
+ (const "org-mode")
+ (const "w32")
(const "woodchuck"))
- :version "24.1")
+ :version "24.3")
(defconst debbugs-gnu-all-packages
(mapcar 'cadr (cdr (get 'debbugs-gnu-default-packages 'custom-type)))
@@ -507,6 +520,7 @@ marked as \"client-side filter\"."
(defun debbugs-gnu-get-bugs (query)
"Retrieve bugs numbers from debbugs.gnu.org according search criteria."
(let* ((debbugs-port "gnu.org")
+ (bugs (assoc 'bugs query))
(tags (assoc 'tag query))
(local-tags (and (member '(severity . "tagged") query) (not tags)))
(phrase (assoc 'phrase query))
@@ -535,6 +549,8 @@ marked as \"client-side filter\"."
(sort
(cond
+ ;; If the query is just a list of bug numbers, we return them.
+ (bugs (cdr bugs))
;; If the query contains the pseudo-severity "tagged", we return
;; just the local tagged bugs.
(local-tags (copy-sequence debbugs-gnu-local-tags))
@@ -1153,16 +1169,15 @@ The following commands are available:
(setq buffer-read-only t))
;;;###autoload
-(defun debbugs-gnu-usertags (&optional users)
- "List all outstanding Emacs bugs."
+(defun debbugs-gnu-usertags (&rest users)
+ "List all user tags for USERS, which is \(\"emacs\"\) by default."
(interactive
- (list
- (if current-prefix-arg
- (completing-read-multiple
- "Package name(s) or email address: "
- (append debbugs-gnu-all-packages (list user-mail-address)) nil nil
- (mapconcat 'identity debbugs-gnu-default-packages ","))
- debbugs-gnu-default-packages)))
+ (if current-prefix-arg
+ (completing-read-multiple
+ "Package name(s) or email address: "
+ (append debbugs-gnu-all-packages (list user-mail-address)) nil nil
+ (mapconcat 'identity debbugs-gnu-default-packages ","))
+ debbugs-gnu-default-packages))
(unwind-protect
(let ((inhibit-read-only t)
@@ -1222,6 +1237,17 @@ The following commands are available:
(let ((args (get-text-property (line-beginning-position)
'tabulated-list-id)))
(when args (apply 'debbugs-gnu args))))
+;;;###autoload
+(defun debbugs-gnu-bugs (&rest bugs)
+ "List all BUGS, a list of bug numbers."
+ (interactive
+ (mapcar 'string-to-number
+ (completing-read-multiple "Bug numbers: " nil 'natnump)))
+ (dolist (elt bugs)
+ (unless (natnump elt) (signal 'wrong-type-argument (list 'natnump elt))))
+ (add-to-list 'debbugs-gnu-current-query (cons 'bugs bugs))
+ (debbugs-gnu nil))
+
(provide 'debbugs-gnu)
;;; TODO:
diff --git a/debbugs.el b/debbugs.el
index ed1f0bc..9271f69 100644
--- a/debbugs.el
+++ b/debbugs.el
@@ -1,6 +1,6 @@
;;; debbugs.el --- SOAP library to access debbugs servers
-;; Copyright (C) 2011, 2012 Free Software Foundation, Inc.
+;; Copyright (C) 2011-2013 Free Software Foundation, Inc.
;; Author: Michael Albinus <michael.albinus@gmx.de>
;; Keywords: comm, hypermedia
diff --git a/debbugs.texi b/debbugs.texi
index 359ba56..ecebf72 100644
--- a/debbugs.texi
+++ b/debbugs.texi
@@ -8,7 +8,7 @@
@end direntry
@copying
-Copyright @copyright{} 2011, 2012 Free Software Foundation, Inc.
+Copyright @copyright{} 2011-2013 Free Software Foundation, Inc.
@quotation
Permission is granted to copy, distribute and/or modify this document
- [elpa] externals/debbugs 37245ae 067/311: * debbugs.texi (top): Add a title page., (continued)
- [elpa] externals/debbugs 37245ae 067/311: * debbugs.texi (top): Add a title page., Stefan Monnier, 2020/11/29
- [elpa] externals/debbugs b15eaf2 068/311: * debbugs-gnu.el (debbugs-gnu-get-bugs): If, Stefan Monnier, 2020/11/29
- [elpa] externals/debbugs b0bd33b 073/311: * debbugs.el (debbugs-get-status): Handle the case of nil BUG-NUMBERS., Stefan Monnier, 2020/11/29
- [elpa] externals/debbugs b7429b6 071/311: Fix previous patch., Stefan Monnier, 2020/11/29
- [elpa] externals/debbugs 8dd02c4 082/311: Update the README for the debbugs package., Stefan Monnier, 2020/11/29
- [elpa] externals/debbugs f6146fe 088/311: Make sorting respect the current narrowing., Stefan Monnier, 2020/11/29
- [elpa] externals/debbugs 15b792d 079/311: Remove ChangeLogs; use "bzr log" instead, Stefan Monnier, 2020/11/29
- [elpa] externals/debbugs 4f825df 084/311: * debbugs-gnu.el (debbugs-gnu-default-severities). Add "serious" to, Stefan Monnier, 2020/11/29
- [elpa] externals/debbugs 7a3f97a 085/311: Add implemented SOAP function "search_est"., Stefan Monnier, 2020/11/29
- [elpa] externals/debbugs 4cc71d5 086/311: Add commands to narrow/widen the bug reports., Stefan Monnier, 2020/11/29
- [elpa] externals/debbugs e794c6c 104/311: Adapt copyright years.,
Stefan Monnier <=
- [elpa] externals/debbugs 698e4c8 095/311: * debbugs.el (debbugs-get-usertag): Change parameters to a KEY-VALUE sequence., Stefan Monnier, 2020/11/29
- [elpa] externals/debbugs 902baa4 106/311: Only keep the strictly necessary *-pkg.el files, Stefan Monnier, 2020/11/29
- [elpa] externals/debbugs d11276e 112/311: Update copyright years., Stefan Monnier, 2020/11/29
- [elpa] externals/debbugs 399edb4 113/311: New command `debbugs-org-regenerate-status', Stefan Monnier, 2020/11/29
- [elpa] externals/debbugs 792d98f 116/311: * debbugs-org.el (debbugs-org-show-buffer-name): New defvar., Stefan Monnier, 2020/11/29
- [elpa] externals/debbugs 37eba87 117/311: * debbugs-gnu.el (debbugs-gnu-default-packages): Add new packages., Stefan Monnier, 2020/11/29
- [elpa] externals/debbugs e27f085 124/311: * packages/debbugs/debbugs-org.el: Miscellanous cleanups., Stefan Monnier, 2020/11/29
- [elpa] externals/debbugs 6b87b3b 126/311: Update the debbugs tag face when switching it off, too, Stefan Monnier, 2020/11/29
- [elpa] externals/debbugs 9136369 130/311: Add a lot of Emacs maintainer DWIM, Stefan Monnier, 2020/11/29
- [elpa] externals/debbugs da6a351 132/311: Handle blocked bugs in debbugs, Stefan Monnier, 2020/11/29