changeset 13366:c8b89eac76b2

Fix previous change.
author Richard M. Stallman <rms@gnu.org>
date Tue, 31 Oct 1995 05:26:32 +0000
parents 2cd15d90fec6
children a3e8c1d2492f
files lisp/loadup.el
diffstat 1 files changed, 1 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/loadup.el	Tue Oct 31 05:22:28 1995 +0000
+++ b/lisp/loadup.el	Tue Oct 31 05:26:32 1995 +0000
@@ -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