From 9b04b1b79f308b75bddd908c10d5fdfa1a08d1ca Mon Sep 17 00:00:00 2001 From: "Richard M. Stallman" Date: Tue, 31 Oct 1995 05:26:32 +0000 Subject: [PATCH] Fix previous change. --- lisp/loadup.el | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/lisp/loadup.el b/lisp/loadup.el index e6b790691a0..cd626ec1938 100644 --- a/lisp/loadup.el +++ b/lisp/loadup.el @@ -153,7 +153,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 (1+ (length base)))))) + (string-to-int (substring name (length base))))) files))) (setq emacs-version (format "%s.%d" emacs-version -- 2.39.2