Mercurial > emacs
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.