[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
master 9c5d8d59cf 5/5: Fix remaining byte-compile warnings in loaddefs.e
From: |
Lars Ingebrigtsen |
Subject: |
master 9c5d8d59cf 5/5: Fix remaining byte-compile warnings in loaddefs.el |
Date: |
Sun, 31 Jul 2022 05:30:09 -0400 (EDT) |
branch: master
commit 9c5d8d59cf94887e5cba94d80ddadf76ccb05a07
Author: Lars Ingebrigtsen <larsi@gnus.org>
Commit: Lars Ingebrigtsen <larsi@gnus.org>
Fix remaining byte-compile warnings in loaddefs.el
* lisp/progmodes/compile.el (compilation--default-buffer-name):
* lisp/kmacro.el (kmacro-name-last-macro):
* lisp/emacs-lisp/package.el (package--activate-all): Autoload to
avoid byte-compilation warnings when byte-compiling loaddefs.el.
---
lisp/emacs-lisp/package.el | 1 +
lisp/kmacro.el | 1 +
lisp/progmodes/compile.el | 1 +
3 files changed, 3 insertions(+)
diff --git a/lisp/emacs-lisp/package.el b/lisp/emacs-lisp/package.el
index 97be7d6e50..df70f908da 100644
--- a/lisp/emacs-lisp/package.el
+++ b/lisp/emacs-lisp/package.el
@@ -1663,6 +1663,7 @@ The variable `package-load-list' controls which packages
to load."
(require 'package)
(package--activate-all)))))
+;;;###autoload
(defun package--activate-all ()
(dolist (elt (package--alist))
(condition-case err
diff --git a/lisp/kmacro.el b/lisp/kmacro.el
index 92118ad143..72420a6730 100644
--- a/lisp/kmacro.el
+++ b/lisp/kmacro.el
@@ -920,6 +920,7 @@ The ARG parameter is unused."
(vectorp f) ;FIXME: Deprecated.
(kmacro-p f)))))
+;;;###autoload
(defun kmacro-name-last-macro (symbol)
"Assign a name to the last keyboard macro defined.
Argument SYMBOL is the name to define.
diff --git a/lisp/progmodes/compile.el b/lisp/progmodes/compile.el
index 9ecea7d21b..5ce80e0657 100644
--- a/lisp/progmodes/compile.el
+++ b/lisp/progmodes/compile.el
@@ -1792,6 +1792,7 @@ Otherwise, construct a buffer name from NAME-OF-MODE."
#'compilation--default-buffer-name)
name-of-mode))
+;;;###autoload
(defun compilation--default-buffer-name (name-of-mode)
(cond ((or (eq major-mode (intern-soft name-of-mode))
(eq major-mode (intern-soft (concat name-of-mode "-mode"))))