From 78b7ad19ed8c2c8706202ae1be513d07e8121b18 Mon Sep 17 00:00:00 2001
From: Jamie Cameron <jcameron@webmin.com>
Date: Fri, 12 Aug 2022 10:53:18 -0700
Subject: [PATCH] Also die if open fails

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

diff --git a/copyconfig.pl b/copyconfig.pl
index 8d0ae48e7..4a4cd9a53 100755
--- a/copyconfig.pl
+++ b/copyconfig.pl
@@ -145,7 +145,7 @@ my ($file, $data_hash, $join_char) = @_;
 my (%old, @order);
 my $join = defined($join_char) ? $join_char : "=";
 &read_file($file, \%old, \@order);
-open(ARFILE, ">$file");
+open(ARFILE, ">$file") || die "open of $file failed : $!";
 my %done;
 foreach $k (@order) {
 	if (exists($data_hash->{$k}) && !$done{$k}++) {