Silence byte-compiler warnings.
lisp/minibuffer.el (completion--twq-all): lisp/term/ns-win.el (ns-initialize-window-system): lisp/term/w32-win.el (w32-initialize-window-system): Mark unused argument.
This commit is contained in:
parent
9cc2810b69
commit
51646b62bd
4 changed files with 9 additions and 3 deletions
|
@ -1,3 +1,9 @@
|
|||
2013-04-16 Juanma Barranquero <lekktu@gmail.com>
|
||||
|
||||
* minibuffer.el (completion--twq-all):
|
||||
* term/ns-win.el (ns-initialize-window-system):
|
||||
* term/w32-win.el (w32-initialize-window-system): Silence byte-compiler.
|
||||
|
||||
2013-04-16 Stefan Monnier <monnier@iro.umontreal.ca>
|
||||
|
||||
* emacs-lisp/nadvice.el (add-function): Default simple vars to their
|
||||
|
|
|
@ -525,7 +525,7 @@ for use at QPOS."
|
|||
(eq t (compare-strings s1 nil nil s2 nil nil 'ignore-case)))
|
||||
|
||||
(defun completion--twq-all (string ustring completions boundary
|
||||
unquote requote)
|
||||
_unquote requote)
|
||||
(when completions
|
||||
(pcase-let*
|
||||
((prefix
|
||||
|
|
|
@ -895,7 +895,7 @@ See the documentation of `create-fontset-from-fontset-spec' for the format.")
|
|||
|
||||
;; Do the actual Nextstep Windows setup here; the above code just
|
||||
;; defines functions and variables that we use now.
|
||||
(defun ns-initialize-window-system (&optional display)
|
||||
(defun ns-initialize-window-system (&optional _display)
|
||||
"Initialize Emacs for Nextstep (Cocoa / GNUstep) windowing."
|
||||
(cl-assert (not ns-initialized))
|
||||
|
||||
|
|
|
@ -246,7 +246,7 @@ See the documentation of `create-fontset-from-fontset-spec' for the format.")
|
|||
(declare-function x-parse-geometry "frame.c" (string))
|
||||
(defvar x-command-line-resources)
|
||||
|
||||
(defun w32-initialize-window-system (&optional display)
|
||||
(defun w32-initialize-window-system (&optional _display)
|
||||
"Initialize Emacs for W32 GUI frames."
|
||||
(cl-assert (not w32-initialized))
|
||||
|
||||
|
|
Loading…
Add table
Reference in a new issue