Mercurial > emacs

diff lisp/loadup.el @ 1113:0ffcf74fb8ad

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
entered into RCS
author Jim Blandy <jimb@redhat.com>
date Sun, 13 Sep 1992 11:44:06 +0000
parents f7477db25e8c
children 9befcd596286
line wrap: on
line diff
--- a/lisp/loadup.el	Sun Sep 13 10:54:38 1992 +0000
+++ b/lisp/loadup.el	Sun Sep 13 11:44:06 1992 +0000
@@ -119,11 +119,9 @@
       (setq name (concat (expand-file-name "../etc/DOC-") name))
       (if (file-exists-p name)
 	  (delete-file name))
-      (copy-file (expand-file-name "../etc/DOC")
-		 name
-		 t)
+      (copy-file (expand-file-name "../etc/DOC") name t)
       (Snarf-documentation (file-name-nondirectory name)))
-  (Snarf-documentation "DOC"))
+    (Snarf-documentation "DOC"))
 (message "Finding pointers to doc strings...done")
 
 ;Note: You can cause additional libraries to be preloaded