From c59e177fbadd9075b8116586d074877a27299ed4 Mon Sep 17 00:00:00 2001
From: Donald Curtis <dcurtis@milkbox.net>
Date: Sun, 26 May 2013 13:21:35 -0500
Subject: [PATCH] force build info files and ignore errors

some files will not build but we try to generate the info anyways,
despite errors.
---
 package-build.el | 39 ++++++++++++++++++++++-----------------
 1 file changed, 22 insertions(+), 17 deletions(-)

diff --git a/package-build.el b/package-build.el
index 3c668ca9..dc0dfe1f 100644
--- a/package-build.el
+++ b/package-build.el
@@ -678,28 +678,33 @@ file path and DEST is the relative path to which it should be copied."
 (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."
   (cl-loop for (source-file . dest-file) in files
-           if (string-match ".texi$" source-file)
-           do (pb/run-process
-               nil
-               "makeinfo"
-               (expand-file-name source-file source-dir)
-               "-o"
-               (expand-file-name (concat (file-name-sans-extension dest-file)
-                                         ".info")
-                                 target-dir))))
+           for target-file = (concat (file-name-sans-extension dest-file)
+                                     ".info")
+           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)))))
 
 (defun pb/generate-dir-file (files target-dir)
   "Create dir file from any .info files listed in FILES in TARGET-DIR."
   (cl-loop for (source-file . dest-file) in files
            if (or (string-match ".info$" source-file)
-                  (string-match ".texi$" source-file))
-           do (pb/run-process
-               nil
-               "install-info"
-               (concat "--dir=" (expand-file-name "dir" target-dir))
-               (expand-file-name (concat (file-name-sans-extension dest-file)
-                                         ".info")
-                                 target-dir))))
+                  (string-match ".texi\\(nfo\\)?$" source-file))
+           do (ignore-errors
+                (pb/run-process
+                 nil
+                 "install-info"
+                 (concat "--dir=" (expand-file-name "dir" target-dir))
+                 (expand-file-name (concat (file-name-sans-extension dest-file)
+                                           ".info")
+                                   target-dir)))))
 
 (defun pb/copy-package-files (files source-dir target-dir)
   "Copy FILES from SOURCE-DIR to TARGET-DIR.