From 145fe412ba3d33d81462ce39bb2e757b0dea93d7 Mon Sep 17 00:00:00 2001 From: Stefan Monnier Date: Wed, 16 Jan 2008 15:55:15 +0000 Subject: [PATCH] (describe-mode): Pass the right buffer to format-mode-line. --- lisp/ChangeLog | 12 ++++++++---- lisp/help.el | 2 +- 2 files changed, 9 insertions(+), 5 deletions(-) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index b1d4e26dfdb..334412d7d0f 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,7 @@ +2008-01-16 Stefan Monnier + + * help.el (describe-mode): Pass the right buffer to format-mode-line. + 2008-01-16 Glenn Morris * comint.el (comint-regexp-arg): Fix no-input case. @@ -14,8 +18,8 @@ 2008-01-16 Ulf Jasper * calendar/icalendar.el (icalendar-version): Increase to 0.16. - (icalendar-export-file, icalendar-import-file): Restore - significant trailing whitespace in `interactive' prompts. + (icalendar-export-file, icalendar-import-file): + Restore significant trailing whitespace in `interactive' prompts. 2008-01-16 Tom Tromey @@ -24,8 +28,8 @@ (icalendar--find-time-zone): New functions. (icalendar--decode-isodatetime): Add `zone' argument, passed to `decode-time'. Doc fix. - (icalendar--convert-ical-to-diary): Compute zone-map. Pass - timezone to icalendar--decode-isodatetime. + (icalendar--convert-ical-to-diary): Compute zone-map. + Pass timezone to icalendar--decode-isodatetime. 2008-01-16 Alan Mackenzie diff --git a/lisp/help.el b/lisp/help.el index 68d3e33fe0a..24f1e74d71a 100644 --- a/lisp/help.el +++ b/lisp/help.el @@ -860,7 +860,7 @@ whose documentation describes the minor mode." (let ((mode mode-name)) (with-current-buffer standard-output (let ((start (point))) - (insert (format-mode-line mode)) + (insert (format-mode-line mode nil nil buffer)) (add-text-properties start (point) '(face bold))))) (princ " mode:\n") (princ (documentation major-mode)))))) -- 2.11.4.GIT