From 7c5c679c9bbf396316ba9602e5ef1bf65e11c23e Mon Sep 17 00:00:00 2001 From: Stefan Kangas Date: Fri, 28 Feb 2025 18:42:18 +0100 Subject: [PATCH] ; Silence byte-compiler during bootstrap (cherry picked from commit 3a5cf24735809d79a8603f6b17079708fa0cce0a) --- lisp/custom.el | 1 + lisp/electric.el | 1 + lisp/gnus/gmm-utils.el | 1 - lisp/international/mule-cmds.el | 1 + lisp/minibuffer.el | 2 ++ lisp/simple.el | 1 + 6 files changed, 6 insertions(+), 1 deletion(-) diff --git a/lisp/custom.el b/lisp/custom.el index f07ac716f64..99929fbf40e 100644 --- a/lisp/custom.el +++ b/lisp/custom.el @@ -81,6 +81,7 @@ if any, or the value of EXP." (eval (let ((sv (get symbol 'saved-value))) (if sv (car sv) exp))))))) +(declare-function widget-apply "wid-edit" (widget property &rest args)) (defun custom-initialize-reset (symbol exp) "Initialize SYMBOL based on EXP. Set the symbol, using its `:set' function (or `set-default-toplevel-value' diff --git a/lisp/electric.el b/lisp/electric.el index b02354a7dd9..e60ce1d042b 100644 --- a/lisp/electric.el +++ b/lisp/electric.el @@ -181,6 +181,7 @@ or comment." ;; The default :value-create produces "list of numbers" when given "list ;; of characters", this prints them as characters. +(declare-function widget-get "wid-edit" (widget property)) (defun electric--print-list-of-chars (widget) (let ((print-integers-as-characters t)) (princ (widget-get widget :value) (current-buffer)))) diff --git a/lisp/gnus/gmm-utils.el b/lisp/gnus/gmm-utils.el index 11a7a8bbd61..5293cff93ed 100644 --- a/lisp/gnus/gmm-utils.el +++ b/lisp/gnus/gmm-utils.el @@ -93,7 +93,6 @@ ARGS are passed to `message'." (get symbol 'widget-type)) (autoload 'widget-create-child-value "wid-edit") -(autoload 'widget-convert "wid-edit") (autoload 'widget-default-get "wid-edit") ;; Note: The format of `gmm-tool-bar-item' may change if some future Emacs diff --git a/lisp/international/mule-cmds.el b/lisp/international/mule-cmds.el index f6f3f56417e..44462af1fef 100644 --- a/lisp/international/mule-cmds.el +++ b/lisp/international/mule-cmds.el @@ -33,6 +33,7 @@ (eval-when-compile (require 'cl-lib)) (defvar dos-codepage) +(autoload 'widget-put "wid-edit") (autoload 'widget-value "wid-edit") ;;; MULE related key bindings and menus. diff --git a/lisp/minibuffer.el b/lisp/minibuffer.el index 323efca2d42..5c953c252ec 100644 --- a/lisp/minibuffer.el +++ b/lisp/minibuffer.el @@ -68,6 +68,8 @@ (eval-when-compile (require 'cl-lib)) +(declare-function widget-put "wid-edit" (widget property value)) + ;;; Completion table manipulation ;; New completion-table operation. diff --git a/lisp/simple.el b/lisp/simple.el index 64ca5e09111..aebd6530c39 100644 --- a/lisp/simple.el +++ b/lisp/simple.el @@ -30,6 +30,7 @@ (eval-when-compile (require 'cl-lib)) +(declare-function widget-apply "wid-edit" (widget property &rest args)) (declare-function widget-convert "wid-edit" (type &rest args)) ;;; From compile.el -- 2.39.5