# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 827131450 0
# Node ID 4d511dd9bfce070aa4baf9ad4c1b3604608b3f6a
# Parent  df37dc2b9bfbbb0c476953e471a3fdf332b5bf4f
(describe-mode): Handle minor mode w/o mode line indicator.

diff -r df37dc2b9bfb -r 4d511dd9bfce lisp/help.el
--- a/lisp/help.el	Mon Mar 18 03:26:17 1996 +0000
+++ b/lisp/help.el	Mon Mar 18 06:44:10 1996 +0000
@@ -334,8 +334,11 @@
 				      0 (match-beginning 0)))))
 		(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"))))
 	(setq minor-modes (cdr minor-modes))))