From 943be3220467f29c7d574c623817b178abc8671f Mon Sep 17 00:00:00 2001
From: Shohei YOSHIDA <syohex@gmail.com>
Date: Fri, 13 Aug 2021 09:44:20 +0900
Subject: [PATCH] Fix byte-compile warnings

---
 lyrics-fetcher-genius.el | 4 ++--
 lyrics-fetcher.el        | 3 +++
 2 files changed, 5 insertions(+), 2 deletions(-)

diff --git a/lyrics-fetcher-genius.el b/lyrics-fetcher-genius.el
index 9ee1e30..a0dc16e 100644
--- a/lyrics-fetcher-genius.el
+++ b/lyrics-fetcher-genius.el
@@ -151,7 +151,7 @@ contains `info-albumartist' or `info-artist' and `info-title'"
 If ASK is non-nil, prompt the user for a choice, otherwise select the
 first song."
   (when (not (= (cdr (assoc 'status (assoc 'meta data))) 200))
-    (error "Error: %" (cdr (assoc 'message (assoc 'meta data)))))
+    (error "Error: %s" (cdr (assoc 'message (assoc 'meta data)))))
   (let* ((results (cdr (assoc 'hits (assoc 'response data))))
          (results-songs (seq-filter
                          (lambda (entry)
@@ -260,7 +260,7 @@ to FOLDER and will be name \"cover_full.<extension>\".
 
 CALLBACK will be called with the path to the resulting file."
   (when (not (= (cdr (assoc 'status (assoc 'meta data))) 200))
-    (error "Error: %" (cdr (assoc 'message (assoc 'meta data)))))
+    (error "Error: %s" (cdr (assoc 'message (assoc 'meta data)))))
   (let ((url (cdr
               (assoc 'cover_art_url
                      (assoc 'album
diff --git a/lyrics-fetcher.el b/lyrics-fetcher.el
index abe96db..a8106f3 100644
--- a/lyrics-fetcher.el
+++ b/lyrics-fetcher.el
@@ -32,6 +32,7 @@
 (require 'lyrics-fetcher-genius)
 (require 'f)
 (require 'emms)
+(require 'emms-browser)
 
 (defgroup lyrics-fetcher ()
   "Fetch song and album covers."
@@ -114,6 +115,8 @@ As of now, genius.com is the only one available."
 (defvar lyrics-fetcher-current-track-method
   "Current track in the lyrics view buffer")
 
+(defvar lyrics-fetcher-current-track)
+
 ;;; Actual lyrics fetching
 (defun lyrics-fetcher-format-song-name (track)
   "Format TRACK to a human-readable form.