Mercurial > emacs
diff lisp/mail/feedmail.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 | 695cf19ef79e |
| children | 4e6c5e8ae4e9 f042e7c0fe20 |
line wrap: on
line diff
--- a/lisp/mail/feedmail.el Mon May 16 10:07:59 2005 +0000 +++ b/lisp/mail/feedmail.el Mon May 16 11:33:47 2005 +0000 @@ -1835,7 +1835,7 @@ (setq blobbet (file-name-nondirectory blobby)) (if (string-match "^[0-9][0-9][0-9]-" blobbet) (let ((water-mark)) - (setq water-mark (string-to-int (substring blobbet 0 3))) + (setq water-mark (string-to-number (substring blobbet 0 3))) (if (> water-mark high-water) (setq high-water water-mark)))) (setq q-cnt (1+ q-cnt))) (t (setq q-oth (1+ q-oth)))