From: Stefan Monnier Date: Wed, 3 Dec 2008 21:57:10 +0000 (+0000) Subject: (apropos-print-doc): Fix thinko that caused long labels to X-Git-Tag: emacs-pretest-23.0.90~1294 X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=f7ede2fac5c03d0013a6045f6ff242743939a060;p=emacs.git (apropos-print-doc): Fix thinko that caused long labels to be used in compact layout and vice-versa. --- 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!