[elpa] externals/emms 50c5f8e 59/80: * emms-librefm-scrobbler.el: add lexical declaration

[Stefan Monnier]

branch: externals/emms
commit 50c5f8e5f5970b4cafa097626c7061ca8659c994
Author: Yoni Rabkin <yoni@rabkins.net>
Commit: Yoni Rabkin <yoni@rabkins.net>

    * emms-librefm-scrobbler.el: add lexical declaration
    
    Explicitly ignore variables that are implicitly not used.
---
 emms-librefm-scrobbler.el | 7 ++++++-
 1 file changed, 6 insertions(+), 1 deletion(-)

diff --git a/emms-librefm-scrobbler.el b/emms-librefm-scrobbler.el
index a49a458..eb4f175 100644
--- a/emms-librefm-scrobbler.el
+++ b/emms-librefm-scrobbler.el
@@ -1,4 +1,4 @@
-;;; emms-librefm-scrobbler.el --- Libre.FM Scrobbing API
+;;; emms-librefm-scrobbler.el --- Libre.FM Scrobbing API  -*- lexical-binding: 
t; -*-
 
 ;; Copyright (C) 2014  Free Software Foundation, Inc.
 
@@ -133,6 +133,7 @@ TOKEN is :user of :secret."
 (defun emms-librefm-scrobbler-handshake-call (url username password)
   "Perform client handshake and return a response in a buffer."
   (let ((url-request-method "POST"))
+    (ignore url-request-method)
     (let ((response
           (url-retrieve-synchronously
            (emms-librefm-scrobbler-handshake-string
@@ -248,6 +249,9 @@ TOKEN is :user of :secret."
           (url-request-data flarb)
           (url-request-extra-headers
            `(("Content-type" . "application/x-www-form-urlencoded"))))
+      (ignore url-request-extra-headers
+             url-request-data
+             url-request-method)
       (url-retrieve emms-librefm-scrobbler-submission-url
                    #'emms-librefm-scrobbler-async-submission-callback
                    (list (cons track rating))))))
@@ -255,6 +259,7 @@ TOKEN is :user of :secret."
 (defun emms-librefm-scrobbler-async-submission-callback (status &optional 
cbargs)
   "Pass response of asynchronous submission call to handler."
   (let ((response (emms-librefm-scrobbler-get-response-status)))
+    (ignore status)
     ;; From the API docs: This indicates that the
     ;; submission request was accepted for processing. It
     ;; does not mean that the submission was valid, but