X-Git-Url: http://christophe.rhodes.io/gitweb/?p=squeeze-el.git;a=blobdiff_plain;f=squeeze.el;h=e79a581cec29cc04524c7ed835e18d92f7c0ad4b;hp=c4a229ad0249a345a0691b2e4914c03e504e36b9;hb=2b3e3629fe12754eb208b775e3311d587c5a33b1;hpb=698e6e901e34e13c21cccdadea39f359399f384d

diff --git a/squeeze.el b/squeeze.el
index c4a229a..e79a581 100644
--- a/squeeze.el
+++ b/squeeze.el
@@ -356,7 +356,7 @@
         (startpos (match-end 0)))
     (unless countpos
       (message "no count found in players line"))
-    (let ((count (parse-integer string (match-beginning 1) (match-end 1)))
+    (let ((count (string-to-number (substring string (match-beginning 1) (match-end 1))))
           result endpos)
       (dotimes (i (1- count))
         (setq endpos (progn (string-match " connected%3A[0-1] " string startpos)