emacs-loadup.patch

   1 --- emacs-20.5/lisp/loadup.el.loadup    Fri Feb 11 16:22:32 2000
   2 +++ emacs-20.5/lisp/loadup.el   Fri Feb 11 16:24:23 2000
   3 @@ -198,7 +199,9 @@
   4        (if (memq system-type '(ms-dos windows-nt))
   5           (setq name (expand-file-name
   6                       (if (fboundp 'x-create-frame) "DOC-X" "DOC") "../etc"))
   7 -       (setq name (concat (expand-file-name "../etc/DOC-") name))
   8 +       (setq name (concat (expand-file-name
   9 +                           (if (fboundp 'x-create-frame) "../etc/DOC-X-"
  10 +                             "../etc/DOC-")) name))
  11         (if (file-exists-p name)
  12             (delete-file name))
  13         (copy-file (expand-file-name "../etc/DOC") name t))