1 files changed, 2 insertions, 1 deletions

diff --git a/lisp/help.el b/lisp/help.el
index 45d84b88970..7c59a96ef43 100644
--- a/lisp/help.el
+++ b/lisp/help.el
@@ -1030,7 +1030,8 @@ help buffer."
     ;; We now have a help buffer on the variable.  Insert the function
     ;; text after it.
     (goto-char (point-max))
-    (insert "\n\n" fdoc))
+    (let ((inhibit-read-only t))
+      (insert "\n\n" fdoc)))
   (goto-char (point-min))
   (help-setup-xref (list #'help-xref-interned symbol) nil))