From f7ede2fac5c03d0013a6045f6ff242743939a060 Mon Sep 17 00:00:00 2001 From: Stefan Monnier Date: Wed, 3 Dec 2008 21:57:10 +0000 Subject: [PATCH] (apropos-print-doc): Fix thinko that caused long labels to be used in compact layout and vice-versa. --- lisp/ChangeLog | 5 +++++ lisp/apropos.el | 4 ++-- 2 files changed, 7 insertions(+), 2 deletions(-) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 674ee0959a0..776db585041 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,8 @@ +2008-12-03 Stefan Monnier + + * apropos.el (apropos-print-doc): Fix thinko that caused long labels to + be used in compact layout and vice-versa. + 2008-12-03 Juanma Barranquero * w32-fns.el (w32-list-locales): Use `with-output-to-temp-buffer', diff --git a/lisp/apropos.el b/lisp/apropos.el index eb6dc8236c4..31830e51223 100644 --- a/lisp/apropos.el +++ b/lisp/apropos.el @@ -1082,8 +1082,8 @@ If non-nil TEXT is a string that will be printed as a heading." 'face 'default 'apropos-symbol (car apropos-item)) (insert-text-button (if apropos-compact-layout - (button-type-get type 'apropos-label) - (format "<%s>" (button-type-get type 'apropos-short-label))) + (format "<%s>" (button-type-get type 'apropos-short-label)) + (button-type-get type 'apropos-label)) 'type type ;; Can't use the default button face, since user may have changed the ;; variable! Just say `no' to variables containing faces! -- 2.11.4.GIT