diff options
Diffstat (limited to 'lisp')
| -rw-r--r-- | lisp/emacs-lisp/check-declare.el | 2 | ||||
| -rw-r--r-- | lisp/emulation/cua-base.el | 2 | ||||
| -rw-r--r-- | lisp/net/net-utils.el | 2 | ||||
| -rw-r--r-- | lisp/term/ns-win.el | 9 |
4 files changed, 15 insertions, 0 deletions
diff --git a/lisp/emacs-lisp/check-declare.el b/lisp/emacs-lisp/check-declare.el index 8fc299d7e93..a7045ad8f22 100644 --- a/lisp/emacs-lisp/check-declare.el +++ b/lisp/emacs-lisp/check-declare.el @@ -284,6 +284,8 @@ TYPE is a string giving the nature of the error. Warning is displayed in type) nil check-declare-warning-buffer))) +(declare-function compilation-forget-errors "compile" ()) + (defun check-declare-files (&rest files) "Check veracity of all `declare-function' statements in FILES. Return a list of any errors found." diff --git a/lisp/emulation/cua-base.el b/lisp/emulation/cua-base.el index c6d7b5018cd..e91ce80bbe2 100644 --- a/lisp/emulation/cua-base.el +++ b/lisp/emulation/cua-base.el @@ -790,6 +790,8 @@ Repeating prefix key when region is active works as a single prefix key." ;;; Region specific commands +(declare-function delete-active-region "delsel" (&optional killp)) + (defun cua-delete-region () "Delete the active region. Save a copy in register 0 if `cua-delete-copy-to-register-0' is non-nil." diff --git a/lisp/net/net-utils.el b/lisp/net/net-utils.el index ebcbc714ffb..eaf1d7e22c4 100644 --- a/lisp/net/net-utils.el +++ b/lisp/net/net-utils.el @@ -326,6 +326,8 @@ This variable is only used if the variable (insert filtered-string) (set-marker (process-mark process) (point)))))) +(declare-function w32-get-console-output-codepage "w32proc.c" ()) + (defun net-utils-run-program (name header program args) "Run a network information program." (let ((buf (get-buffer-create (concat "*" name "*"))) diff --git a/lisp/term/ns-win.el b/lisp/term/ns-win.el index 9264a1cf033..6f8f29c6b3d 100644 --- a/lisp/term/ns-win.el +++ b/lisp/term/ns-win.el @@ -930,6 +930,15 @@ See the documentation of `create-fontset-from-fontset-spec' for the format.") (gui-method-define window-system-initialization ns #'ns-initialize-window-system) +(declare-function ns-own-selection-internal "nsselect.m" (selection value)) +(declare-function ns-disown-selection-internal "nsselect.m" (selection)) +(declare-function ns-selection-owner-p "nsselect.m" + (&optional selection terminal)) +(declare-function ns-selection-exists-p "nsselect.m" + (&optional selection terminal)) +(declare-function ns-get-selection "nsselect.m" + (selection-symbol target-type &optional time-stamp terminal)) + (gui-method-define gui-set-selection ns (lambda (selection value) (if value (ns-own-selection-internal selection value) |
