From: Christophe Rhodes <csr21@cantab.net>
Date: Tue, 8 Apr 2014 21:03:53 +0000 (+0100)
Subject: use string-to-number rather than parse-integer
X-Git-Url: http://christophe.rhodes.io/gitweb/?a=commitdiff_plain;h=2b3e3629fe12754eb208b775e3311d587c5a33b1;p=squeeze-el.git

use string-to-number rather than parse-integer
---

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)