emacsbug.el trivia.

* lisp/mail/emacsbug.el (report-emacs-bug-create-existing-bugs-buffer):
Remove more undefined cl functions.

2 files changed, 5 insertions, 2 deletions

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 812fa2deba5..76f3d6ff082 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,5 +1,8 @@
 2010-12-03  Glenn Morris  <rgm@gnu.org>
 
+        * mail/emacsbug.el (report-emacs-bug-create-existing-bugs-buffer):
+        Remove more undefined cl functions.
+
         * vc/diff.el (diff-sentinel): Make new arguments optional.
         * ibuf-ext.el (diff-sentinel): Update declaration.
 
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"))