procyberian/emacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

* admin/admin.el (make-manuals-dist--1):

Browse source 
Update for incompatible copy-file change re "directories".
This commit is contained in:
Glenn Morris 2019-04-16 14:33:24 -07:00
parent d0f745f67a
commit a1c53d4294
1 changed files with 2 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

3
admin/admin.el
View file

@ -696,6 +696,7 @@ style=\"text-align:left\">")
(if (file-directory-p stem) (if (file-directory-p stem)
(delete-directory stem t)) (delete-directory stem t))
(make-directory stem) (make-directory stem)
(setq stem (file-name-as-directory stem))
(copy-file "../doc/misc/texinfo.tex" stem) (copy-file "../doc/misc/texinfo.tex" stem)
(unless (equal type "emacs") (unless (equal type "emacs")
(copy-file "../doc/emacs/emacsver.texi" stem) (copy-file "../doc/emacs/emacsver.texi" stem)
@ -718,7 +719,7 @@ style=\"text-align:left\">")
(setq ats t) (setq ats t)
(message "Unexpanded: %s" (match-string 0))) (message "Unexpanded: %s" (match-string 0)))
(if ats (error "Unexpanded configure variables in Makefile?"))) (if ats (error "Unexpanded configure variables in Makefile?")))
(write-region nil nil (expand-file-name (format "%s/Makefile" stem)) (write-region nil nil (expand-file-name (format "%sMakefile" stem))
nil 'silent)) nil 'silent))
(call-process "tar" nil nil nil "-cf" tarfile stem) (call-process "tar" nil nil nil "-cf" tarfile stem)
(delete-directory stem t) (delete-directory stem t)