diff lisp/server.el @ 62402:a7e02ef1e3d6

Replace `string-to-int' by `string-to-number'.
author Juanma Barranquero <lekktu@gmail.com>
date Mon, 16 May 2005 11:33:47 +0000
parents aac0a33f5772
children 6fb026ad601f 21eea50897a7 f042e7c0fe20
line wrap: on
line diff
--- a/lisp/server.el	Mon May 16 10:07:59 2005 +0000
+++ b/lisp/server.el	Mon May 16 11:33:47 2005 +0000
@@ -325,11 +325,11 @@
 		       (setq request "")))))
 	   ;; ARG is a line number option.
 	   ((string-match "\\`\\+[0-9]+\\'" arg)
-	    (setq lineno (string-to-int (substring arg 1))))
+	    (setq lineno (string-to-number (substring arg 1))))
 	   ;; ARG is line number:column option.
 	   ((string-match "\\`+\\([0-9]+\\):\\([0-9]+\\)\\'" arg)
-	    (setq lineno (string-to-int (match-string 1 arg))
-		  columnno (string-to-int (match-string 2 arg))))
+	    (setq lineno (string-to-number (match-string 1 arg))
+		  columnno (string-to-number (match-string 2 arg))))
 	   (t
 	    ;; Undo the quoting that emacsclient does
 	    ;; for certain special characters.