From 49093f601b69d91126aefd328ee8f6bfeb797407 Mon Sep 17 00:00:00 2001 From: Juanma Barranquero Date: Fri, 15 Apr 2011 05:15:22 +0200 Subject: [PATCH] lisp/loadup.el: Use `string-to-number', not `string-to-int'. --- lisp/ChangeLog | 13 ++++++++----- lisp/loadup.el | 2 +- 2 files changed, 9 insertions(+), 6 deletions(-) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 3449a0ada9c..9b162f94a6d 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,7 @@ +2011-04-15 Juanma Barranquero + + * loadup.el: Use `string-to-number', not `string-to-int'. + 2011-04-15 Stefan Monnier * progmodes/gud.el (gud-gdb): Use completion-at-point instead of @@ -8,11 +12,10 @@ 2011-04-14 Michael Albinus - * net/tramp-sh.el (tramp-sh-handle-file-attributes): Handle the - case when the scripts fail. Use `tramp-do-file-attributes-with-ls' - then. - (tramp-do-copy-or-rename-file-out-of-band): Do not check any - longer, whether`executable-find' is bound. + * net/tramp-sh.el (tramp-sh-handle-file-attributes): Handle the case + when the scripts fail. Use `tramp-do-file-attributes-with-ls' then. + (tramp-do-copy-or-rename-file-out-of-band): Do not check any longer + whether `executable-find' is bound. * net/tramp-smb.el (tramp-smb-handle-copy-file): Fix docstring. diff --git a/lisp/loadup.el b/lisp/loadup.el index 8a11a6e3e06..d348456ae32 100644 --- a/lisp/loadup.el +++ b/lisp/loadup.el @@ -263,7 +263,7 @@ (let* ((base (concat "emacs-" emacs-version ".")) (files (file-name-all-completions base default-directory)) (versions (mapcar (function (lambda (name) - (string-to-int (substring name (length base))))) + (string-to-number (substring name (length base))))) files))) ;; `emacs-version' is a constant, so we shouldn't change it with `setq'. (defconst emacs-version -- 2.39.2