summaryrefslogtreecommitdiff
path: root/lisp/mail/emacsbug.el
diff options
context:
space:
mode:
authorGlenn Morris <rgm@gnu.org>2010-12-02 19:03:06 -0800
committerGlenn Morris <rgm@gnu.org>2010-12-02 19:03:06 -0800
commitf62f063dd0141c16191057eced0d5c07ff9808f5 (patch)
treeeed810615aae69befcf3070b3fb36127f689c9fb /lisp/mail/emacsbug.el
parentc879436a90358f40d439794d453bd532a86d392a (diff)
downloademacs-f62f063dd0141c16191057eced0d5c07ff9808f5.tar.gz
emacsbug.el trivia.
* lisp/mail/emacsbug.el (report-emacs-bug-create-existing-bugs-buffer): Remove more undefined cl functions.
Diffstat (limited to 'lisp/mail/emacsbug.el')
-rw-r--r--lisp/mail/emacsbug.el4
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/mail/emacsbug.el b/lisp/mail/emacsbug.el
index a00f4c3a46e..5bc6a7edd82 100644
--- a/lisp/mail/emacsbug.el
+++ b/lisp/mail/emacsbug.el
@@ -399,11 +399,11 @@ and send the mail again%s."
(dolist (bug bugs)
(push (list
'url-link
- :format (concat "Bug#" (number-to-string (third bug))
+ :format (concat "Bug#" (number-to-string (nth 2 bug))
": " (cadr bug) "\n %[%v%]\n")
;; FIXME: Why is only the link of the
;; active item clickable?
- (first bug))
+ (car bug))
items))
(nreverse items))))
(widget-insert "No bugs maching your keywords found.\n"))