Mercurial > hg > xemacs-beta

diff lisp/help.el @ 732:b9b8621c2439

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[xemacs-hg @ 2002-01-22 14:16:38 by youngs] 2002-01-14 Björn Torkelsson <torkel@pdc.kth.se> * menubar-items.el (default-menubar): Open URLs menubar entries moved to mail-lib 2002-01-16 John Paul Wallington <jpw@shootybangbang.com> * cus-start.el: customize the builtin variable 'modifier-keys-sticky-time'. 2002-01-09 John Paul Wallington <jpw@shootybangbang.com> * help.el (describe-mode): synched with FSF 19.34; handle nil minor mode indicators.
author youngs
date Tue, 22 Jan 2002 14:16:39 +0000
parents 11502791fc1c
children 943eaba38521
line wrap: on
line diff
--- a/lisp/help.el	Fri Jan 18 18:01:04 2002 +0000
+++ b/lisp/help.el	Tue Jan 22 14:16:39 2002 +0000
@@ -538,8 +538,11 @@
 		   (setq indicator (cdr indicator)))
 		 (while (and indicator (symbolp indicator))
 		   (setq indicator (symbol-value indicator)))
-		 (princ (format "%s minor mode (indicator%s):\n"
-				pretty-minor-mode indicator))
+		 (princ (format "%s minor mode (%s):\n"
+				pretty-minor-mode
+				(if indicator
+				    (format "indicator%s" indicator)
+				  "no indicator")))
 		 (princ (documentation minor-mode))
 		 (princ "\n\n----\n\n"))))
 	 (setq minor-modes (cdr minor-modes)))))