+2011-07-06 Stefan Monnier <monnier@iro.umontreal.ca>
+
+ * debbugs-gnu.el (debbugs-gnu): New group.
+ (widget-mouse-face, gnus-posting-styles): Declare.
+ (debbugs-suppress-done): Avoid beginning-of-buffer.
+
2011-07-06 Lars Magne Ingebrigtsen <larsi@gnus.org>
* debbugs-gnu.el (debbugs-toggle-sort): Sort the tagged bugs at
2011-07-05 Michael Albinus <michael.albinus@gmx.de>
- * debbugs-gnu.el (debbugs-owner): Removed. We use `debbugs-tagged'
+ * debbugs-gnu.el (debbugs-owner): Remove. We use `debbugs-tagged'
uniquely.
(debbugs-widgets, debbugs-package, debbugs-severities)
(debbugs-archive): New defvars.
* debbugs-gnu.el (debbugs-widget-map): Add [mouse-1] and [mouse-2].
(debbugs-emacs): Add :help-echo and :suppress-done for report
pages' widgets.
- (debbugs-show-reports): Remove suppress-done from arguments. It
- must be read from the widget anyway. Tune inserting of bottom
+ (debbugs-show-reports): Remove suppress-done from arguments.
+ It must be read from the widget anyway. Tune inserting of bottom
line widgets.
(debbugs-owner): New face.
(debbugs-show-reports): Mark subject if the user is the bug's
(autoload 'gnus-summary-article-header "gnus-sum")
(autoload 'message-make-from "message")
+(defgroup debbugs-gnu ()
+ "UI for the debbugs.gnu.org bug tracker."
+ :group 'debbugs)
+
(defface debbugs-new '((t (:foreground "red")))
"Face for new reports that nobody has answered.")
(defvar debbugs-current-widget nil)
+(defvar widget-mouse-face)
+
(defun debbugs-show-reports (widget)
"Show bug reports as given in WIDGET property :bug-ids."
(pop-to-buffer (get-buffer-create (widget-get widget :buffer-name)))
(unless (widget-get debbugs-current-widget :suppress-done)
(let ((inhibit-read-only t))
(widget-put debbugs-current-widget :suppress-done t)
- (beginning-of-buffer)
+ (goto-char (point-min))
(while (and (not (eobp))
(not (get-text-property (point) 'debbugs-status)))
(forward-line 1))
(define-key map "C" 'debbugs-send-control-message)
map))
+(defvar gnus-posting-styles)
+
(define-minor-mode debbugs-summary-mode
"Minor mode for providing a debbugs interface in Gnus summary buffers.