From 51646b62bd1d2709257d4a026dc7349ddb9f8b28 Mon Sep 17 00:00:00 2001
From: Juanma Barranquero <lekktu@gmail.com>
Date: Tue, 16 Apr 2013 04:41:37 +0200
Subject: [PATCH] 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.

---
 lisp/ChangeLog       | 6 ++++++
 lisp/minibuffer.el   | 2 +-
 lisp/term/ns-win.el  | 2 +-
 lisp/term/w32-win.el | 2 +-
 4 files changed, 9 insertions(+), 3 deletions(-)

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 9554625b6e4..36614741dac 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -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
diff --git a/lisp/minibuffer.el b/lisp/minibuffer.el
index d07f270a519..06ac7a91bea 100644
--- a/lisp/minibuffer.el
+++ b/lisp/minibuffer.el
@@ -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
diff --git a/lisp/term/ns-win.el b/lisp/term/ns-win.el
index 5617c31beff..0d4d3aaa26b 100644
--- a/lisp/term/ns-win.el
+++ b/lisp/term/ns-win.el
@@ -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))
 
diff --git a/lisp/term/w32-win.el b/lisp/term/w32-win.el
index b0f65812eab..acadb0fad43 100644
--- a/lisp/term/w32-win.el
+++ b/lisp/term/w32-win.el
@@ -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))
 
-- 
2.39.2