[elpa] externals/emms 0388219 71/80: lexical declaration

[Stefan Monnier]

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

    lexical declaration
---
 emms-playlist-sort.el   | 2 +-
 emms-score.el           | 2 +-
 emms-setup.el           | 2 +-
 emms-show-all.el        | 2 +-
 emms-source-file.el     | 2 +-
 emms-source-playlist.el | 3 ++-
 emms-stream-info.el     | 2 +-
 emms-streams.el         | 2 +-
 emms-url.el             | 2 +-
 emms-volume-amixer.el   | 2 +-
 emms-volume-mixerctl.el | 2 +-
 emms-volume-pulse.el    | 3 +--
 emms-volume.el          | 4 ++--
 13 files changed, 15 insertions(+), 15 deletions(-)

diff --git a/emms-playlist-sort.el b/emms-playlist-sort.el
index e23604b..ae5bb56 100644
--- a/emms-playlist-sort.el
+++ b/emms-playlist-sort.el
@@ -1,4 +1,4 @@
-;;; emms-playlist-sort.el --- sort emms playlist
+;;; emms-playlist-sort.el --- sort emms playlist  -*- lexical-binding: t; -*-
 
 ;; Copyright (C) 2005, 2006, 2007, 2008, 2009, 2018 Free Software Foundation, 
Inc.
 
diff --git a/emms-score.el b/emms-score.el
index 8c783c5..1537322 100644
--- a/emms-score.el
+++ b/emms-score.el
@@ -1,4 +1,4 @@
-;;; emms-score.el --- Scoring system for mp3player
+;;; emms-score.el --- Scoring system for mp3player  -*- lexical-binding: t; -*-
 
 ;; Copyright (C) 2003, 2004, 2005, 2006, 2007, 2008,
 ;;   2009, 2018 Free Software Foundation, Inc.
diff --git a/emms-setup.el b/emms-setup.el
index 21a7c03..5bf9396 100644
--- a/emms-setup.el
+++ b/emms-setup.el
@@ -1,4 +1,4 @@
-;;; emms-setup.el --- Setup script for EMMS
+;;; emms-setup.el --- Setup script for EMMS  -*- lexical-binding: t; -*-
 
 ;; Copyright (C) 2005-2020 Free Software Foundation, Inc.
 
diff --git a/emms-show-all.el b/emms-show-all.el
index f37ef5e..fa7181d 100644
--- a/emms-show-all.el
+++ b/emms-show-all.el
@@ -1,4 +1,4 @@
-;;; emms-show-all.el --- Detailed track information for Emms.
+;;; emms-show-all.el --- Detailed track information for Emms.  -*- 
lexical-binding: t; -*-
 
 ;; Copyright (C) 2016  Free Software Foundation, Inc.
 
diff --git a/emms-source-file.el b/emms-source-file.el
index 2be6538..ed8d832 100644
--- a/emms-source-file.el
+++ b/emms-source-file.el
@@ -1,4 +1,4 @@
-;;; emms-source-file.el --- EMMS sources from the filesystem.
+;;; emms-source-file.el --- EMMS sources from the filesystem.  -*- 
lexical-binding: t; -*-
 
 ;; Copyright (C) 2003, 2004, 2005, 2006, 2007, 2008,
 ;;   2009 Free Software Foundation, Inc.
diff --git a/emms-source-playlist.el b/emms-source-playlist.el
index 327be8c..aca63b7 100644
--- a/emms-source-playlist.el
+++ b/emms-source-playlist.el
@@ -1,4 +1,4 @@
-;;; emms-source-playlist.el --- EMMS sources from playlist files
+;;; emms-source-playlist.el --- EMMS sources from playlist files  -*- 
lexical-binding: t; -*-
 
 ;; Copyright (C) 2003, 2004, 2005, 2006, 2007, 2008,
 ;;   2009 Free Software Foundation, Inc.
@@ -208,6 +208,7 @@ See `emms-source-playlist-formats' for a list of supported 
formats."
 
 (defun emms-source-playlist-parse-native (file)
   "Parse the native EMMS playlist in the current buffer."
+  (ignore file)
   (save-excursion
     (goto-char (point-min))
     (read (current-buffer))))
diff --git a/emms-stream-info.el b/emms-stream-info.el
index 2bc7a41..035af43 100644
--- a/emms-stream-info.el
+++ b/emms-stream-info.el
@@ -1,4 +1,4 @@
-;;; emms-stream-info.el --- Info from streaming audio
+;;; emms-stream-info.el --- Info from streaming audio  -*- lexical-binding: t; 
-*-
 
 ;; Copyright (C) 2004, 2005, 2006, 2007, 2008,
 ;;   2009, 2019 Free Software Foundation, Inc.
diff --git a/emms-streams.el b/emms-streams.el
index c3b2d11..3055f73 100644
--- a/emms-streams.el
+++ b/emms-streams.el
@@ -1,4 +1,4 @@
-;; emms-streams.el -- A collection of online streaming audio
+;; emms-streams.el -- A collection of online streaming audio  -*- 
lexical-binding: t; -*-
 
 ;; Copyright (C) 2019  Free Software Foundation, Inc.
 
diff --git a/emms-url.el b/emms-url.el
index 59d5cfa..4e05d7a 100644
--- a/emms-url.el
+++ b/emms-url.el
@@ -1,4 +1,4 @@
-;;; emms-url.el --- Make URL and EMMS work together well
+;;; emms-url.el --- Make URL and EMMS work together well  -*- lexical-binding: 
t; -*-
 
 ;; Copyright (C) 2006, 2007, 2008, 2009 Free Software Foundation, Inc.
 
diff --git a/emms-volume-amixer.el b/emms-volume-amixer.el
index 190f6b0..9cd4cb3 100644
--- a/emms-volume-amixer.el
+++ b/emms-volume-amixer.el
@@ -1,4 +1,4 @@
-;;; emms-volume-amixer.el --- a mode for changing volume using amixer
+;;; emms-volume-amixer.el --- a mode for changing volume using amixer  -*- 
lexical-binding: t; -*-
 
 ;; Copyright (C) 2006, 2007, 2008, 2009 Free Software Foundation, Inc.
 
diff --git a/emms-volume-mixerctl.el b/emms-volume-mixerctl.el
index 4ca7820..72bdfec 100644
--- a/emms-volume-mixerctl.el
+++ b/emms-volume-mixerctl.el
@@ -1,4 +1,4 @@
-;;; emms-volume-mixerctl.el --- a mode for changing volume using mixerctl
+;;; emms-volume-mixerctl.el --- a mode for changing volume using mixerctl  -*- 
lexical-binding: t; -*-
 
 ;; Copyright (C) 2006, 2007, 2008, 2009, 2019 Free Software Foundation, Inc.
 
diff --git a/emms-volume-pulse.el b/emms-volume-pulse.el
index 440ab7f..10b8889 100644
--- a/emms-volume-pulse.el
+++ b/emms-volume-pulse.el
@@ -1,4 +1,4 @@
-;;; emms-volume-pulse.el --- a mode for changing volume using PulseAudio pactl
+;;; emms-volume-pulse.el --- a mode for changing volume using PulseAudio pactl 
 -*- lexical-binding: t; -*-
 
 ;; Copyright (C) 2015 Free Software Foundation, Inc.
 
@@ -65,7 +65,6 @@ See full list of devices on your system by running
 (defun emms-volume--pulse-get-volume ()
   "Return `emms-volume-pulse-sink' volume."
   (let ((sink-number-p (numberp emms-volume-pulse-sink))
-        (start 0)
         (output
          (shell-command-to-string
           (concat "pactl list sinks" "|"
diff --git a/emms-volume.el b/emms-volume.el
index 078eef5..655e587 100644
--- a/emms-volume.el
+++ b/emms-volume.el
@@ -1,4 +1,4 @@
-;;; emms-volume.el --- Volume functions and a minor mode to adjust volume 
easily
+;;; emms-volume.el --- Volume functions and a minor mode to adjust volume 
easily  -*- lexical-binding: t; -*-
 
 ;; Copyright (C) 2006, 2007, 2008, 2009 Free Software Foundation, Inc.
 
@@ -64,7 +64,7 @@
    ((executable-find "amixer") 'emms-volume-amixer-change)
    ((executable-find "pactl") 'emms-volume-pulse-change)
    ((executable-find "mixerctl") 'emms-volume-mixerctl-change)
-   (t #'(lambda (amount) (user-error "%s" "No supported mixer found.  Please, 
define ‘emms-volume-change-function’."))))
+   (t #'(lambda (_amount) (user-error "%s" "No supported mixer found.  Please, 
define ‘emms-volume-change-function’."))))
   "*The function to use to change the volume.
 If you have your own functions for changing volume, set this."
   :type '(choice (const :tag "Amixer" emms-volume-amixer-change)