branch: externals/debbugs
commit e2ef75afe76f2529b780a2f5cc6b9696676679d9
Author: Lars Magne Ingebrigtsen <[email protected]>
Commit: Lars Magne Ingebrigtsen <[email protected]>
Make the "g" command work.
I apparently forgot to save the buffer before I checked in last time.
---
debbugs-gnu.el | 12 ++++++------
1 file changed, 6 insertions(+), 6 deletions(-)
diff --git a/debbugs-gnu.el b/debbugs-gnu.el
index b63eaa6..1b361ae 100644
--- a/debbugs-gnu.el
+++ b/debbugs-gnu.el
@@ -124,6 +124,8 @@
:bug-ids ids)
nil))))
+(defvar debbugs-current-widget nil)
+
(defun debbugs-show-reports (widget widgets)
"Show bug reports as given in WIDGET property :bug-ids."
(pop-to-buffer (get-buffer-create (widget-get widget :buffer-name)))
@@ -223,9 +225,9 @@
(widget-setup))
(set-buffer-modified-p nil)
- (goto-char (point-min))
- (put-text-property (point) (1+ (point)) 'debbugs-current-widget
- (list widget widgets))))
+ (set (make-local-variable 'debbugs-current-widget)
+ (list widget widgets))
+ (goto-char (point-min))))
(defvar debbugs-mode-map
(let ((map (make-sparse-keymap)))
@@ -241,9 +243,7 @@
(defun debbugs-rescan ()
"Rescan the current set of bug reports."
(interactive)
- (apply 'debbugs-show-reports
- (get-text-property (point-min)
- 'debbugs-current-widget)))
+ (apply 'debbugs-show-reports debbugs-current-widget))
(defvar debbugs-sort-state 'number)
