(describe-mode): Fix 2004-10-13 change.

Copy pure "Auto Fill" string so it can be propertized later
without causing a read-only error.

1 files changed, 2 insertions, 1 deletions

diff --git a/lisp/help.el b/lisp/help.el
index 5a2867bdc18..0ed9fe4b759 100644
--- a/lisp/help.el
+++ b/lisp/help.el
@@ -651,7 +651,8 @@ whose documentation describes the minor mode."
                  (push (list pretty-minor-mode mode indicator)
                        minor-modes))))
         (if auto-fill-function
-            (push '("Auto Fill" auto-fill-mode " Fill")
+            ;; copy pure string so we can add face property to it below.
+            (push (list (copy-sequence "Auto Fill") 'auto-fill-mode " Fill")
                   minor-modes))
         (setq minor-modes
               (sort minor-modes