From e23dcdffa69b4ffeeb8f7403e49b6aa6ca784067 Mon Sep 17 00:00:00 2001 From: Eli Zaretskii Date: Thu, 12 Nov 1998 11:42:45 +0000 Subject: [PATCH] (buffer-undo-list): For ms-dos, use fns.el without the version string. --- lisp/loadup.el | 8 +++++--- 1 file changed, 5 insertions(+), 3 deletions(-) diff --git a/lisp/loadup.el b/lisp/loadup.el index 1bfcad604bf..254b6ad2c24 100644 --- a/lisp/loadup.el +++ b/lisp/loadup.el @@ -225,9 +225,11 @@ (setq tem (cdr tem)))) (princ ")))\n" (current-buffer)) (write-region (point-min) (point-max) - (expand-file-name (convert-standard-filename - (format "../lisp/fns-%s.el" emacs-version)) - invocation-directory)) + (expand-file-name + (if (eq system-type 'ms-dos) + "../lisp/fns.el" + (format "../lisp/fns-%s.el" emacs-version)) + invocation-directory)) (erase-buffer)) (setq load-history nil) (set-buffer-modified-p nil) -- 2.39.2