summaryrefslogtreecommitdiff
path: root/lisp/loadup.el
diff options
context:
space:
mode:
authorRichard M. Stallman <rms@gnu.org>1992-08-31 21:42:28 +0000
committerRichard M. Stallman <rms@gnu.org>1992-08-31 21:42:28 +0000
commit6ec3899e1629c6f954d12fc7773ddd5a8f1a76be (patch)
treeeb181b38fa44f07c67c70902a7c3073348d9edf7 /lisp/loadup.el
parent616ed245e9bc6cca7fb41575193ac6dcf5ea422e (diff)
downloademacs-6ec3899e1629c6f954d12fc7773ddd5a8f1a76be.tar.gz
*** empty log message ***
Diffstat (limited to 'lisp/loadup.el')
-rw-r--r--lisp/loadup.el1
1 files changed, 1 insertions, 0 deletions
diff --git a/lisp/loadup.el b/lisp/loadup.el
index afca23d5e35..7710e47582f 100644
--- a/lisp/loadup.el
+++ b/lisp/loadup.el
@@ -116,6 +116,7 @@
(setq name (concat (downcase (substring name 0 (match-beginning 0)))
"-"
(substring name (match-end 0)))))
+ (delete-file (concat (expand-file-name "../etc/DOC-") name))
(copy-file (expand-file-name "../etc/DOC")
(concat (expand-file-name "../etc/DOC-") name)
t)