Mercurial > emacs
diff lisp/shell.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 | c157250db02c |
children | e5299a8016cb f042e7c0fe20 |
line wrap: on
line diff
--- a/lisp/shell.el Mon May 16 10:07:59 2005 +0000 +++ b/lisp/shell.el Mon May 16 11:33:47 2005 +0000 @@ -759,7 +759,7 @@ ;; If STR is of the form +n, for n>0, return n. Otherwise, nil. (defun shell-extract-num (str) (and (string-match "^\\+[1-9][0-9]*$" str) - (string-to-int str))) + (string-to-number str))) (defun shell-dirtrack-mode ()