From ce431170765dd2275062becd3c97de697f0ab56e Mon Sep 17 00:00:00 2001 From: Martchus Date: Sat, 11 Sep 2021 16:42:40 +0200 Subject: [PATCH] Do proper error handing when writing header files --- scripts/yaml2enum.pl | 9 +++++++-- 1 file changed, 7 insertions(+), 2 deletions(-) diff --git a/scripts/yaml2enum.pl b/scripts/yaml2enum.pl index e156711..776a5d1 100755 --- a/scripts/yaml2enum.pl +++ b/scripts/yaml2enum.pl @@ -46,6 +46,11 @@ for my $icon (@$icons) { my $category = join ',', @$categories; my $camelized_id = camelize $id; $camelized_id = "Icon$camelized_id" if $camelized_id =~ qr/^\d+.*/; - print $enum_output "$camelized_id = 0x$unicode, /**< $id: name: $name, created: $created, category: $category */\n"; - print $id_output "{ QStringLiteral(\"$id\"), Icon::$camelized_id },\n"; + print $enum_output "$camelized_id = 0x$unicode, /**< $id: name: $name, created: $created, category: $category */\n" + or die "Can't write to file \"$enum_output_file\": $!\n"; + print $id_output "\{ QStringLiteral(\"$id\"), Icon::$camelized_id \},\n" + or die "Can't write to file \"$id_output_file\": $!\n"; } + +close $enum_output or die "Can't close to file \"$enum_output_file\": $!\n"; +close $id_output or die "Can't close to file \"$id_output_file\": $!\n";