From 3032d7cc38ffe79446a59fcb6c2f11c688fb838e Mon Sep 17 00:00:00 2001
From: Andrew Ruthven <puck@catalystcloud.nz>
Date: Mon, 27 Jun 2022 21:36:29 +1200
Subject: [PATCH] Better error message

---
 merge.pl | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/merge.pl b/merge.pl
index 53d41e1..65695af 100755
--- a/merge.pl
+++ b/merge.pl
@@ -106,7 +106,7 @@ sub merge_with_csv {
 
   # Work out the headers for the CSV file.
   my $headers = $csv->getline($IN);
-  die "Nothing in $vars!" unless @$headers;
+  die "Nothing in $vars!" unless defined $headers && @$headers;
   $csv->column_names(@$headers);
   
   if ($tmplData->{'attachment_col'}) {
-- 
2.30.2