update syncgroups parser for new server

[squeeze-el.git] / squeeze.el

diff --git a/squeeze.el b/squeeze.el
index 7dbf1202f3a658c63025d5d50d599716cc9b6622..a255c603505d423bad69b812628e79daa50ac856 100644 (file)
--- a/squeeze.el
+++ b/squeeze.el
@@ -332,8 +332,9 @@
         (let ((syncgroups squeeze-syncgroups)
               (seen))
           (while syncgroups
-            (let ((names (getf syncgroups :names))
-                  (members (split-string (getf syncgroups :members) ",")))
+            (let ((names (getf syncgroups :sync_member_names))
+                  ;; new server version has sync_members and sync_member_names
+                  (members (split-string (getf syncgroups :sync_members) ",")))
               (insert (propertize names 'face 'squeeze-syncgroup-face) "\n")
               (dolist (member members)
                 (let ((player (squeeze-find-player member)))