summaryrefslogtreecommitdiff
path: root/lisp/help-mode.el
diff options
context:
space:
mode:
Diffstat (limited to 'lisp/help-mode.el')
-rw-r--r--lisp/help-mode.el10
1 files changed, 1 insertions, 9 deletions
diff --git a/lisp/help-mode.el b/lisp/help-mode.el
index 5553556e03c..ec60d05f1da 100644
--- a/lisp/help-mode.el
+++ b/lisp/help-mode.el
@@ -295,16 +295,8 @@ Commands:
;;;###autoload
(defun help-mode-finish ()
- (when (eq major-mode 'help-mode)
+ (when (derived-mode-p 'help-mode)
(setq buffer-read-only t)
- (save-excursion
- (goto-char (point-min))
- (let ((inhibit-read-only t))
- (when (re-search-forward "^This [^[:space:]]+ is advised.$" nil t)
- (put-text-property (match-beginning 0)
- (match-end 0)
- 'face 'font-lock-warning-face))))
-
(help-make-xrefs (current-buffer))))
;; Grokking cross-reference information in doc strings and