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/emacs-lisp | |
parent | 216d380630ec8be9569a56687f0e08b89ee97c47 (diff) | |
download | emacs-027a4b6b3fd229f8aea323f59cb246d99deb8a75.tar.gz emacs-027a4b6b3fd229f8aea323f59cb246d99deb8a75.tar.bz2 emacs-027a4b6b3fd229f8aea323f59cb246d99deb8a75.zip |
Replace `string-to-int' by `string-to-number'.
Diffstat (limited to 'lisp/emacs-lisp')
-rw-r--r-- | lisp/emacs-lisp/lisp-mnt.el | 2 | ||||
-rw-r--r-- | lisp/emacs-lisp/re-builder.el | 2 |
2 files changed, 2 insertions, 2 deletions
diff --git a/lisp/emacs-lisp/lisp-mnt.el b/lisp/emacs-lisp/lisp-mnt.el index 701da1c4dec..a385a32935e 100644 --- a/lisp/emacs-lisp/lisp-mnt.el +++ b/lisp/emacs-lisp/lisp-mnt.el @@ -418,7 +418,7 @@ ISO-DATE non-nil means return the date in ISO 8601 format." (format "%s-%s-%s" yyyy mm dd) (format "%s %s %s" dd - (nth (string-to-int mm) + (nth (string-to-number mm) '("" "Jan" "Feb" "Mar" "Apr" "May" "Jun" "Jul" "Aug" "Sep" "Oct" "Nov" "Dec")) yyyy)))))) diff --git a/lisp/emacs-lisp/re-builder.el b/lisp/emacs-lisp/re-builder.el index 1c8d12fef0e..a2aed39d00a 100644 --- a/lisp/emacs-lisp/re-builder.el +++ b/lisp/emacs-lisp/re-builder.el @@ -557,7 +557,7 @@ optional fourth argument FORCE is non-nil." (interactive) (setq reb-subexp-displayed - (or subexp (string-to-int (format "%c" last-command-char)))) + (or subexp (string-to-number (format "%c" last-command-char)))) (reb-update-modestring) (reb-do-update reb-subexp-displayed)) |