Fix more melpazoid warnings

danielfm · Dec 5, 2023 · e94517c · e94517c
1 parent 116763d
commit e94517c
Show file tree

Hide file tree

Showing 3 changed files with 13 additions and 12 deletions.
diff --git a/smudge-api.el b/smudge-api.el
@@ -6,8 +6,8 @@
 
 ;;; Commentary:
 
-;; This library is the interface to the Spotify RESTful API. It also does some custom handling of
-;; the OAuth code exchange via 'simple-httpd
+;; This library is the interface to the Spotify RESTful API. It also does some
+;; custom handling of the OAuth code exchange via 'simple-httpd
 
 ;;; Code:
 
@@ -608,14 +608,14 @@ Call CALLBACK if provided."
  callback))
 
 (defun smudge-api-queue-add-tracks (track-ids &optional callback)
- "Add given TRACK-IDs to the queue"
+ "Add given TRACK-IDS to the queue"
  ;; Spotify's API doesn't provide a endpoint that would enable us to
  ;; add multiple tracks to the queue at the same time.
  ;; Thus we have to synchronously add the tracks
  ;; one by one to the queue.
  (if (car track-ids)
  (smudge-api-queue-add-track (car track-ids)
- (lambda (response)
+ (lambda (_)
  (smudge-api-queue-add-tracks (cdr track-ids)
  nil)))
  (funcall callback)))

diff --git a/smudge-apple.el b/smudge-apple.el
@@ -6,8 +6,9 @@
 
 ;;; Commentary:
 
-;; This library handles controlling Spotify via Applescript commands. It implements a set of
-;; multimethod-like functions that are dispatched in smudge-controller.el.
+;; This library handles controlling Spotify via Applescript commands. It
+;; implements a set of multimethod-like functions that are dispatched in
+;; smudge-controller.el.
 
 ;;; Code:
 

diff --git a/smudge-connect.el b/smudge-connect.el
@@ -6,9 +6,9 @@
 
 ;;; Commentary:
 
-;; This library uses the "connect" APIs to control transport functions of remote and local instances
-;; of Spotify clients. It implements a set of multimethod-like functions that are dispatched in
-;; smudge-controller.el.
+;; This library uses the "connect" APIs to control transport functions of
+;; remote and local instances of Spotify clients. It implements a set of
+;; multimethod-like functions that are dispatched in smudge-controller.el.
 
 ;; smudge-connect.el --- Smudge transport for the Spotify Connect API
 
@@ -125,9 +125,9 @@ Returns a JSON string in the format:
  (let ((volume (smudge-connect-get-volume status)))
  (if (eq volume 0)
  (smudge-api-set-volume (smudge-connect-get-device-id status) 100
-  (lambda (_) (message "Volume unmuted")))
+ (lambda (_) (message "Volume unmuted")))
  (smudge-api-set-volume (smudge-connect-get-device-id status) 0
-  (lambda (_) (message "Volume muted")))))))))
+ (lambda (_) (message "Volume muted")))))))))
 
 (defun smudge-connect-toggle-repeat ()
  "Toggle repeat for the current track."
@@ -156,7 +156,7 @@ Returns a JSON string in the format:
 (defun smudge-connect--is-shuffling (player-status)
  "Business logic for shuffling state of PLAYER-STATUS."
  (and player-status
-  (not (eq (gethash 'shuffle_state player-status) :json-false))))
+ (not (eq (gethash 'shuffle_state player-status) :json-false))))
 
 (defun smudge-connect--is-repeating (player-status)
  "Business logic for repeat state of PLAYER-STATUS."