 
 (defvar spotify-remote-mode-map
   (let ((map (make-sparse-keymap)))
-    (define-key map (kbd "M-p M-s") 'spotify-toggle-shuffling)
-    (define-key map (kbd "M-p M-r") 'spotify-toggle-repeating)
+    (define-key map (kbd "M-p M-s") 'spotify-toggle-shuffle)
+    (define-key map (kbd "M-p M-r") 'spotify-toggle-repeat)
     (define-key map (kbd "M-p M-p") 'spotify-toggle-play)
     (define-key map (kbd "M-p M-,") 'spotify-previous-track)
     (define-key map (kbd "M-p M-.") 'spotify-next-track)

  (interactive)
  (spotify-apply "repeating-p"))

(defun spotify-toggle-repeating ()
  "Sends a command to Spotify process to toggle the repeating flag."
  (interactive)
  (spotify-apply "toggle-repeating")
  (message "Spotify repeating is %s"
           (if (spotify-repeating-p) "on" "off")))


  (interactive)
  (spotify-apply "shuffling-p"))

(defun spotify-toggle-shuffle ()
  "Sends a command to Spotify process to toggle the shuffling flag."
  (interactive)
  (spotify-apply "toggle-shuffle")
  (message "Spotify shuffling is %s"
           (if (spotify-shuffling-p) "on" "off")))

