floss/empc
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Rewrite `empc-response-get-playlist' to convert some attributes to integer.

Browse source
This commit is contained in:
Renaud Casenave-Péré 2011-07-07 18:50:26 +09:00
parent 1ad38c8e2d
commit 949a4cb920
1 changed files with 4 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

5
empc.el
View file

@ -147,7 +147,10 @@ form '('error (error-code . error-message))."
(plist-get song field))
(setq empc-current-playlist (cons song empc-current-playlist))
(setq song nil))
(setq song (cons field (cons (cdr cell) song)))))
(cond
((member field '(:time :track :date :pos :id))
(setq song (cons field (cons (string-to-int (cdr cell)) song))))
(t (setq song (cons field (cons (cdr cell) song)))))))
(setq empc-current-playlist (cons song empc-current-playlist))))
(defun empc-response-idle (data)