emacs-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

master 9b2e5b2 2/2: Remove redundant requires of 'help'


From: Stefan Kangas
Subject: master 9b2e5b2 2/2: Remove redundant requires of 'help'
Date: Thu, 3 Dec 2020 09:15:03 -0500 (EST)

branch: master
commit 9b2e5b230156fa871f48fd5788e76dd9d33c059c
Author: Stefan Kangas <stefan@marxist.se>
Commit: Stefan Kangas <stefan@marxist.se>

    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 948443f..c8a6676 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 7442a24..e5ac1d1 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 e7f3f7b..cdff4b8 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)



reply via email to

[Prev in Thread] Current Thread [Next in Thread]