diff options
author | Munechika SUMIKAWA <sumikawa@FreeBSD.org> | 2002-05-24 17:02:58 +0000 |
---|---|---|
committer | Munechika SUMIKAWA <sumikawa@FreeBSD.org> | 2002-05-24 17:02:58 +0000 |
commit | 28bbc232488f0c149fc8208072c42c2021e0b5cb (patch) | |
tree | 725b989df5afb15ddc3274c4b42ebee09594979d /japanese/emacs-emcws/files/patch-lisp:loadup.el | |
parent | fba33a8f85ffc371b9f88a260844668ee6d9a310 (diff) |
Notes
Diffstat (limited to 'japanese/emacs-emcws/files/patch-lisp:loadup.el')
-rw-r--r-- | japanese/emacs-emcws/files/patch-lisp:loadup.el | 26 |
1 files changed, 26 insertions, 0 deletions
diff --git a/japanese/emacs-emcws/files/patch-lisp:loadup.el b/japanese/emacs-emcws/files/patch-lisp:loadup.el new file mode 100644 index 000000000000..5f93219c9143 --- /dev/null +++ b/japanese/emacs-emcws/files/patch-lisp:loadup.el @@ -0,0 +1,26 @@ +--- lisp/loadup.el.orig Wed Apr 10 16:53:14 2002 ++++ lisp/loadup.el Wed Apr 10 16:55:48 2002 +@@ -264,7 +264,7 @@ + (if (memq system-type '(ms-dos windows-nt)) + (setq name (expand-file-name + (if (fboundp 'x-create-frame) "DOC-X" "DOC") "../etc")) +- (setq name (concat (expand-file-name "../etc/DOC-") name)) ++ (setq name (concat (expand-file-name "../etc/DOC-EMCWS-") name)) + (if (file-exists-p name) + (delete-file name)) + (copy-file (expand-file-name "../etc/DOC") name t)) +@@ -300,11 +300,11 @@ + (expand-file-name + (cond + ((eq system-type 'ms-dos) +- "../lib-src/fns.el") ++ "../lib-src/fnsemcws.el") + ((eq system-type 'windows-nt) +- (format "../../../lib-src/fns-%s.el" emacs-version)) ++ (format "../../../lib-src/fns-emcws-%s.el" emacs-version)) + (t +- (format "../lib-src/fns-%s.el" emacs-version))) ++ (format "../lib-src/fns-emcws-%s.el" emacs-version))) + invocation-directory)) + (erase-buffer) + (setq load-history nil)) |