diff options
| author | Stefan Kangas | 2024-07-04 23:55:16 +0200 |
|---|---|---|
| committer | Stefan Kangas | 2024-07-04 23:55:16 +0200 |
| commit | 0e591a9112c15bfe7bd19c06fa117cfc9e87f8b5 (patch) | |
| tree | 251eb128fb477faf6a8d02191faaf34d314586a9 | |
| parent | f91387cce8f6f1dced427ad44686ffcc69574ef6 (diff) | |
| download | emacs-0e591a9112c15bfe7bd19c06fa117cfc9e87f8b5.tar.gz emacs-0e591a9112c15bfe7bd19c06fa117cfc9e87f8b5.zip | |
Remove redundant `require`s
* lisp/gnus/canlock.el (sha1):
* lisp/international/utf7.el (base64):
* lisp/net/hmac-md5.el (md5):
* lisp/org/ob-processing.el (sha1):
* lisp/org/org-feed.el (sha1):
* test/lisp/net/rfc2104-tests.el (sha1, md5): Don't require features
that are built-in, and always provided.
| -rw-r--r-- | lisp/gnus/canlock.el | 2 | ||||
| -rw-r--r-- | lisp/international/utf7.el | 1 | ||||
| -rw-r--r-- | lisp/net/hmac-md5.el | 1 | ||||
| -rw-r--r-- | lisp/org/ob-processing.el | 1 | ||||
| -rw-r--r-- | lisp/org/org-feed.el | 1 | ||||
| -rw-r--r-- | test/lisp/net/rfc2104-tests.el | 2 |
6 files changed, 0 insertions, 8 deletions
diff --git a/lisp/gnus/canlock.el b/lisp/gnus/canlock.el index 02744a7f0a5..39ae6809a55 100644 --- a/lisp/gnus/canlock.el +++ b/lisp/gnus/canlock.el | |||
| @@ -41,8 +41,6 @@ | |||
| 41 | 41 | ||
| 42 | ;;; Code: | 42 | ;;; Code: |
| 43 | 43 | ||
| 44 | (require 'sha1) | ||
| 45 | |||
| 46 | (defvar mail-header-separator) | 44 | (defvar mail-header-separator) |
| 47 | 45 | ||
| 48 | (defgroup canlock nil | 46 | (defgroup canlock nil |
diff --git a/lisp/international/utf7.el b/lisp/international/utf7.el index 63009b0744a..2b23bee1038 100644 --- a/lisp/international/utf7.el +++ b/lisp/international/utf7.el | |||
| @@ -63,7 +63,6 @@ | |||
| 63 | 63 | ||
| 64 | ;;; Code: | 64 | ;;; Code: |
| 65 | 65 | ||
| 66 | (require 'base64) | ||
| 67 | (require 'mm-util) | 66 | (require 'mm-util) |
| 68 | 67 | ||
| 69 | (defconst utf7-direct-encoding-chars " -%'-*,-[]-}" | 68 | (defconst utf7-direct-encoding-chars " -%'-*,-[]-}" |
diff --git a/lisp/net/hmac-md5.el b/lisp/net/hmac-md5.el index 1c4ac24a9c4..af323b0d2b0 100644 --- a/lisp/net/hmac-md5.el +++ b/lisp/net/hmac-md5.el | |||
| @@ -29,7 +29,6 @@ | |||
| 29 | 29 | ||
| 30 | (eval-when-compile (require 'hmac-def)) | 30 | (eval-when-compile (require 'hmac-def)) |
| 31 | (require 'hex-util) ; (decode-hex-string STRING) | 31 | (require 'hex-util) ; (decode-hex-string STRING) |
| 32 | (require 'md5) ; expects (md5 STRING) | ||
| 33 | 32 | ||
| 34 | (defun md5-binary (string) | 33 | (defun md5-binary (string) |
| 35 | "Return the MD5 of STRING in binary form." | 34 | "Return the MD5 of STRING in binary form." |
diff --git a/lisp/org/ob-processing.el b/lisp/org/ob-processing.el index 2733b1d1f6d..f7326f0eea7 100644 --- a/lisp/org/ob-processing.el +++ b/lisp/org/ob-processing.el | |||
| @@ -56,7 +56,6 @@ | |||
| 56 | (org-assert-version) | 56 | (org-assert-version) |
| 57 | 57 | ||
| 58 | (require 'ob) | 58 | (require 'ob) |
| 59 | (require 'sha1) | ||
| 60 | 59 | ||
| 61 | (declare-function processing-sketch-run "ext:processing-mode" ()) | 60 | (declare-function processing-sketch-run "ext:processing-mode" ()) |
| 62 | 61 | ||
diff --git a/lisp/org/org-feed.el b/lisp/org/org-feed.el index 4077afa0d3c..c90174f0fa7 100644 --- a/lisp/org/org-feed.el +++ b/lisp/org/org-feed.el | |||
| @@ -92,7 +92,6 @@ | |||
| 92 | (org-assert-version) | 92 | (org-assert-version) |
| 93 | 93 | ||
| 94 | (require 'org) | 94 | (require 'org) |
| 95 | (require 'sha1) | ||
| 96 | 95 | ||
| 97 | (declare-function url-retrieve-synchronously "url" | 96 | (declare-function url-retrieve-synchronously "url" |
| 98 | (url &optional silent inhibit-cookies timeout)) | 97 | (url &optional silent inhibit-cookies timeout)) |
diff --git a/test/lisp/net/rfc2104-tests.el b/test/lisp/net/rfc2104-tests.el index be5da619eaa..40e593ad56b 100644 --- a/test/lisp/net/rfc2104-tests.el +++ b/test/lisp/net/rfc2104-tests.el | |||
| @@ -23,8 +23,6 @@ | |||
| 23 | 23 | ||
| 24 | (require 'ert) | 24 | (require 'ert) |
| 25 | (require 'rfc2104) | 25 | (require 'rfc2104) |
| 26 | (require 'sha1) | ||
| 27 | (require 'md5) | ||
| 28 | 26 | ||
| 29 | (ert-deftest dbus-test-sha1 () | 27 | (ert-deftest dbus-test-sha1 () |
| 30 | (should | 28 | (should |