github/melpa
1
0
Fork 0
mirror of https://github.com/correl/melpa.git synced 2024-12-22 19:17:27 +00:00
Code Issues Projects Releases Packages Wiki Activity

don't force build of info files

Browse source
This commit is contained in:
Donald Curtis 2013-05-27 11:09:59 -05:00
parent 7d2bc846d7
commit 65d2daafe5
1 changed files with 4 additions and 3 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

7
package-build.el
View file

@ -679,18 +679,19 @@ file path and DEST is the relative path to which it should be copied."
(mapcar 'car (pb/expand-config-file-list dir config)))
(defun pb/generate-info-files (files source-dir target-dir)
"Create .info files from any .texi files listed in FILES in SOURCE-DIR in TARGET-DIR."
"Create .info files from any .texi files listed in FILES in SOURCE-DIR in TARGET-DIR.
Deletes the .texi(nfo) files if they exist."
(cl-loop for (source-file . dest-file) in files
for target-file = (concat (file-name-sans-extension dest-file)
".info")
if (and (string-match ".texi\\(nfo\\)?$" dest-file)
if (and (string-match ".texi\\(nfo\\)?$" source-file)
(not (file-exists-p target-file)))
do (ignore-errors
(pb/run-process
nil
"makeinfo"
(expand-file-name source-file source-dir)
"--force"
"-o"
(expand-file-name target-file
target-dir)))