[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emms-patches] [commit][master] Make emms-lastfm-protocol-version a cons
From: |
mwolson |
Subject: |
[Emms-patches] [commit][master] Make emms-lastfm-protocol-version a constant and fix a typo. |
Date: |
Mon, 16 Jun 2008 15:40:05 -0400 |
commit 8a45d190bfc5e4728f2bcab5674636c0779f7074
Author: Tassilo Horn <address@hidden>
Date: Mon Jun 16 21:35:57 2008 +0200
Make emms-lastfm-protocol-version a constant and fix a typo.
diff --git a/emms-lastfm.el b/emms-lastfm.el
index 4fb851a..1f597d7 100644
--- a/emms-lastfm.el
+++ b/emms-lastfm.el
@@ -134,6 +134,8 @@ procedure. Only for internal use.")
"The client ID of EMMS. Don't change it!")
(defconst emms-lastfm-client-version 0.2
"The version registered at last.fm. Don't change it!")
+(defconst emms-lastfm-protocol-version 1.2
+ "The version of the supported last.fm protocol. Don't change it.")
;; used internally
(defvar emms-lastfm-process nil "-- only used internally --")
@@ -169,7 +171,7 @@ paused track resumes) and sets the track submission timer."
(setq emms-lastfm-timer
(run-with-timer secs nil 'emms-lastfm-submit-track))))))
;; Update the now playing info displayed on the user's last.fm page. This
- ;; doesn't affect the user's profile, so it con be done even for tracks that
+ ;; doesn't affect the user's profile, so it can be done even for tracks that
;; should not be submitted.
(emms-lastfm-submit-now-playing))
@@ -338,7 +340,8 @@ handshake."
(let ((timestamp (emms-lastfm-current-unix-time-string)))
(emms-lastfm-http-GET
(concat emms-lastfm-server
- "?hs=true&p=1.2"
+ "?hs=true"
+ "&p=" (number-to-string emms-lastfm-protocol-version)
"&c=" emms-lastfm-client-id
"&v=" (number-to-string emms-lastfm-client-version)
"&u=" (emms-url-quote emms-lastfm-username)
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [Emms-patches] [commit][master] Make emms-lastfm-protocol-version a constant and fix a typo.,
mwolson <=