diff options
| author | Glenn Morris | 2019-04-16 14:33:24 -0700 |
|---|---|---|
| committer | Glenn Morris | 2019-04-16 14:33:24 -0700 |
| commit | a1c53d4294550380de76d6a6c4e29e9e8f6f9133 (patch) | |
| tree | 4a5e831683dda10f865a40b33c40c84932835f60 | |
| parent | d0f745f67ac36b4acc452deaa3a63d36c1c580a7 (diff) | |
| download | emacs-a1c53d4294550380de76d6a6c4e29e9e8f6f9133.tar.gz emacs-a1c53d4294550380de76d6a6c4e29e9e8f6f9133.zip | |
* admin/admin.el (make-manuals-dist--1):
Update for incompatible copy-file change re "directories".
| -rw-r--r-- | admin/admin.el | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/admin/admin.el b/admin/admin.el index 41b1854c90d..c1f6174874b 100644 --- a/admin/admin.el +++ b/admin/admin.el | |||
| @@ -696,6 +696,7 @@ style=\"text-align:left\">") | |||
| 696 | (if (file-directory-p stem) | 696 | (if (file-directory-p stem) |
| 697 | (delete-directory stem t)) | 697 | (delete-directory stem t)) |
| 698 | (make-directory stem) | 698 | (make-directory stem) |
| 699 | (setq stem (file-name-as-directory stem)) | ||
| 699 | (copy-file "../doc/misc/texinfo.tex" stem) | 700 | (copy-file "../doc/misc/texinfo.tex" stem) |
| 700 | (unless (equal type "emacs") | 701 | (unless (equal type "emacs") |
| 701 | (copy-file "../doc/emacs/emacsver.texi" stem) | 702 | (copy-file "../doc/emacs/emacsver.texi" stem) |
| @@ -718,7 +719,7 @@ style=\"text-align:left\">") | |||
| 718 | (setq ats t) | 719 | (setq ats t) |
| 719 | (message "Unexpanded: %s" (match-string 0))) | 720 | (message "Unexpanded: %s" (match-string 0))) |
| 720 | (if ats (error "Unexpanded configure variables in Makefile?"))) | 721 | (if ats (error "Unexpanded configure variables in Makefile?"))) |
| 721 | (write-region nil nil (expand-file-name (format "%s/Makefile" stem)) | 722 | (write-region nil nil (expand-file-name (format "%sMakefile" stem)) |
| 722 | nil 'silent)) | 723 | nil 'silent)) |
| 723 | (call-process "tar" nil nil nil "-cf" tarfile stem) | 724 | (call-process "tar" nil nil nil "-cf" tarfile stem) |
| 724 | (delete-directory stem t) | 725 | (delete-directory stem t) |