diff options
| author | Juanma Barranquero <lekktu@gmail.com> | 2005-05-16 11:34:49 +0000 |
|---|---|---|
| committer | Juanma Barranquero <lekktu@gmail.com> | 2005-05-16 11:34:49 +0000 |
| commit | 027a4b6b3fd229f8aea323f59cb246d99deb8a75 (patch) | |
| tree | c92da7d3049376d7bd687db6bc5c8dce82ed9335 /lisp/mail/feedmail.el | |
| parent | 216d380630ec8be9569a56687f0e08b89ee97c47 (diff) | |
| download | emacs-027a4b6b3fd229f8aea323f59cb246d99deb8a75.tar.gz | |
Replace `string-to-int' by `string-to-number'.
Diffstat (limited to 'lisp/mail/feedmail.el')
| -rw-r--r-- | lisp/mail/feedmail.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/mail/feedmail.el b/lisp/mail/feedmail.el index 3d1b1951421..7c7265ac8c9 100644 --- a/lisp/mail/feedmail.el +++ b/lisp/mail/feedmail.el @@ -1835,7 +1835,7 @@ the counts." (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))) |