diff options
| -rw-r--r-- | lisp/loadup.el | 8 |
1 files changed, 5 insertions, 3 deletions
diff --git a/lisp/loadup.el b/lisp/loadup.el index 1bfcad604b..254b6ad2c2 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) |