From f62f063dd0141c16191057eced0d5c07ff9808f5 Mon Sep 17 00:00:00 2001 From: Glenn Morris Date: Thu, 2 Dec 2010 19:03:06 -0800 Subject: [PATCH] emacsbug.el trivia. * lisp/mail/emacsbug.el (report-emacs-bug-create-existing-bugs-buffer): Remove more undefined cl functions. --- lisp/ChangeLog | 3 +++ lisp/mail/emacsbug.el | 4 ++-- 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 + * 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")) -- 2.39.5