+ (setq squeeze-players (squeeze-parse-players-line string)))
+ ((string-match "^\\([0-9a-f][0-9a-f]%3A[0-9a-f][0-9a-f]%3A[0-9a-f][0-9a-f]%3A[0-9a-f][0-9a-f]%3A[0-9a-f][0-9a-f]%3A[0-9a-f][0-9a-f]\\) power \\([01]\\)" string)
+ (let ((state (match-string 2 string))
+ (id (url-unhex-string (match-string 1 string)))
+ player)
+ (dolist (p squeeze-players)
+ (when (string= id (squeeze-player-playerid p))
+ (setq player p)
+ (return)))
+ (setf (squeeze-player-power player) state)))))