summaryrefslogtreecommitdiff
path: root/lisp/emacs-lisp
diff options
context:
space:
mode:
authorJuanma Barranquero <lekktu@gmail.com>2005-05-16 11:34:49 +0000
committerJuanma Barranquero <lekktu@gmail.com>2005-05-16 11:34:49 +0000
commit027a4b6b3fd229f8aea323f59cb246d99deb8a75 (patch)
treec92da7d3049376d7bd687db6bc5c8dce82ed9335 /lisp/emacs-lisp
parent216d380630ec8be9569a56687f0e08b89ee97c47 (diff)
downloademacs-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.el2
-rw-r--r--lisp/emacs-lisp/re-builder.el2
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))