From d4744ed754637eae62f75e1616fdaae07b2e8e24 Mon Sep 17 00:00:00 2001
From: Hugo Villeneuve <hugo@hugovil.com>
Date: Mon, 6 Jan 2014 11:50:02 -0500
Subject: [PATCH] Add error checking when creating output file

---
 bomgen/bomgen.php | 9 +++++++++
 1 file changed, 9 insertions(+)

diff --git a/bomgen/bomgen.php b/bomgen/bomgen.php
index d38f116..d3055a5 100755
--- a/bomgen/bomgen.php
+++ b/bomgen/bomgen.php
@@ -219,6 +219,10 @@ $workbook = new Spreadsheet_Excel_Writer($dest);
 /* Création du worksheet */
 $worksheet =& $workbook->addWorksheet($titre);
 
+if (PEAR::isError($worksheet)) {
+    die($worksheet->getMessage());
+}
+
 /* Importation du BOM CSV. */
 $data = array();
 $row_num = 1;
@@ -416,4 +420,9 @@ xls_configure($workbook, $worksheet);
 
 $workbook->close();
 
+if (!file_exists($dest)) {
+  echo "Cannot create destination file: " . $dest . "\n";
+  exit(1);
+}
+
 ?>
-- 
2.20.1