procyberian/emacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Address some check-declare warnings.

Browse source 
* lisp/simple.el (tabulated-list-print):
* lisp/progmodes/elisp-mode.el (xref-collect-matches):
* lisp/term/ns-win.el (ns-selection-owner-p, ns-selection-exists-p)
(ns-get-selection): Update declarations.
This commit is contained in:
Glenn Morris 2015-06-16 20:33:48 -04:00
parent d5152a7eef
commit fb77502f69
3 changed files with 5 additions and 8 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

2
lisp/progmodes/elisp-mode.el
View file

@ -582,7 +582,7 @@ It can be quoted, or be inside a quoted form."
(declare-function xref-make-bogus-location "xref" (message))
(declare-function xref-make "xref" (description location))
(declare-function xref-collect-matches "xref" (input dir &optional kind))
(declare-function xref-collect-matches "xref" (symbol dir))
(declare-function xref-collect-references "xref" (symbol dir))
(defun elisp-xref-find (action id)

2
lisp/simple.el
View file

@ -3521,7 +3521,7 @@ support pty association, if PROGRAM is nil."
(defvar tabulated-list-sort-key)
(declare-function tabulated-list-init-header "tabulated-list" ())
(declare-function tabulated-list-print "tabulated-list"
(&optional remember-pos))
(&optional remember-pos update))
(defvar process-menu-query-only nil)

9
lisp/term/ns-win.el
View file

@ -930,12 +930,9 @@ See the documentation of `create-fontset-from-fontset-spec' for the format.")
(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))
(declare-function ns-selection-owner-p "nsselect.m" (&optional selection))
(declare-function ns-selection-exists-p "nsselect.m" (&optional selection))
(declare-function ns-get-selection "nsselect.m" (selection-symbol target-type))
(cl-defmethod gui-backend-set-selection (selection value
&context (window-system (eql ns)))