From 9b2e5b230156fa871f48fd5788e76dd9d33c059c Mon Sep 17 00:00:00 2001
From: Stefan Kangas <stefan@marxist.se>
Date: Wed, 2 Dec 2020 15:56:54 +0100
Subject: [PATCH] Remove redundant requires of 'help'

* lisp/emacs-lisp/advice.el (ad-read-advised-function):
* lisp/emacs-lisp/ert.el:
* lisp/facemenu.el: Don't require 'help'; it is preloaded since
version 18.59.
---
 lisp/emacs-lisp/advice.el | 3 +--
 lisp/emacs-lisp/ert.el    | 1 -
 lisp/facemenu.el          | 3 ---
 3 files changed, 1 insertion(+), 6 deletions(-)

diff --git a/lisp/emacs-lisp/advice.el b/lisp/emacs-lisp/advice.el
index 948443fc18a..c8a6676b665 100644
--- a/lisp/emacs-lisp/advice.el
+++ b/lisp/emacs-lisp/advice.el
@@ -1840,8 +1840,7 @@ function at point for which PREDICATE returns non-nil)."
 	(or default
 	    ;; Prefer func name at point, if it's an advised function etc.
 	    (let ((function (progn
-			      (require 'help)
-			      (function-called-at-point))))
+                              (function-called-at-point))))
 	      (and function
 		   (member (symbol-name function) ad-advised-functions)
 		   (or (null predicate)
diff --git a/lisp/emacs-lisp/ert.el b/lisp/emacs-lisp/ert.el
index 7442a247f9e..e5ac1d1f1cb 100644
--- a/lisp/emacs-lisp/ert.el
+++ b/lisp/emacs-lisp/ert.el
@@ -63,7 +63,6 @@
 (require 'easymenu)
 (require 'ewoc)
 (require 'find-func)
-(require 'help)
 (require 'pp)
 
 ;;; UI customization options.
diff --git a/lisp/facemenu.el b/lisp/facemenu.el
index e7f3f7bb03b..cdff4b8f3e6 100644
--- a/lisp/facemenu.el
+++ b/lisp/facemenu.el
@@ -85,9 +85,6 @@
 
 ;;; Code:
 
-(eval-when-compile
-  (require 'help))
-
 ;; Global bindings:
 (define-key global-map [C-down-mouse-2] 'facemenu-menu)
 (define-key global-map "\M-o" 'facemenu-keymap)
-- 
2.39.5