better state reporting
This commit is contained in:
@@ -392,7 +392,7 @@
|
||||
|
||||
(let ((m-id (hash-ref h 'at-music-id)))
|
||||
(unless (and (null? force) (or (eq? m-id #f) (= m-id 0)))
|
||||
(cb (list 'state h))))
|
||||
(cb (list 'state (list h player-state)))))
|
||||
)
|
||||
)
|
||||
|
||||
|
||||
Reference in New Issue
Block a user