Mercurial > emacs

diff lisp/mail/emacsbug.el @ 91327:606f2d163a64

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Merge from emacs--devo--0 Revision: emacs@sv.gnu.org/emacs--unicode--0--patch-312
author Miles Bader <miles@gnu.org>
date Wed, 09 Jan 2008 01:21:15 +0000
parents 53108e6cea98 4c3c683cdff8
children d2de7d81aab9
line wrap: on
line diff
--- a/lisp/mail/emacsbug.el	Tue Jan 08 05:34:24 2008 +0000
+++ b/lisp/mail/emacsbug.el	Wed Jan 09 01:21:15 2008 +0000
@@ -1,7 +1,7 @@
 ;;; emacsbug.el --- command to report Emacs bugs to appropriate mailing list
 
 ;; Copyright (C) 1985, 1994, 1997, 1998, 2000, 2001, 2002, 2003,
-;;   2004, 2005, 2006, 2007 Free Software Foundation, Inc.
+;;   2004, 2005, 2006, 2007, 2008 Free Software Foundation, Inc.
 
 ;; Author: K. Shane Hartman
 ;; Maintainer: FSF
@@ -168,7 +168,9 @@
 		    default-enable-multibyte-characters))
     (insert "\n")
     (insert (format "Major mode: %s\n"
-		    (buffer-local-value 'mode-name from-buffer)))
+		    (format-mode-line
+                     (buffer-local-value 'mode-name from-buffer)
+                     nil nil from-buffer)))
     (insert "\n")
     (insert "Minor modes in effect:\n")
     (dolist (mode minor-mode-list)