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:
Juanma Barranquero 2013-04-16 04:41:37 +02:00
parent 9cc2810b69
commit 51646b62bd
4 changed files with 9 additions and 3 deletions

View file

@ -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

View file

@ -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

View file

@ -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))

View file

@ -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))