[Emacs-diffs] /srv/bzr/emacs/trunk r102560: emacsbug.el trivia.

[Glenn Morris]

------------------------------------------------------------
revno: 102560
committer: Glenn Morris <address@hidden>
branch nick: trunk
timestamp: Thu 2010-12-02 19:03:06 -0800
message:
  emacsbug.el trivia.
  * lisp/mail/emacsbug.el (report-emacs-bug-create-existing-bugs-buffer):
  Remove more undefined cl functions.
modified:
  lisp/ChangeLog
  lisp/mail/emacsbug.el

=== modified file 'lisp/ChangeLog'
--- a/lisp/ChangeLog    2010-12-03 03:01:16 +0000
+++ b/lisp/ChangeLog    2010-12-03 03:03:06 +0000
@@ -1,5 +1,8 @@
 2010-12-03  Glenn Morris  <address@hidden>
 
+       * 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.
 

=== modified file 'lisp/mail/emacsbug.el'
--- a/lisp/mail/emacsbug.el     2010-11-27 03:15:59 +0000
+++ b/lisp/mail/emacsbug.el     2010-12-03 03:03:06 +0000
@@ -399,11 +399,11 @@
                       (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"))