Combine 2 statements into one, eliminating repetition

perl-workflow · Aug 7, 2023 · 5badf80 · 5badf80
1 parent c1cfdff
commit 5badf80
Showing 1 changed file with 1 addition and 2 deletions.
diff --git a/lib/Workflow/Config/XML.pm b/lib/Workflow/Config/XML.pm
@@ -63,8 +63,7 @@ sub parse {
         catch ($error) {
             # If processing multiple config files, this makes it much easier
             # to find a problem.
-            $log->error("Processing $file_name: ", $error);
-            croak "Processing $file_name: $error";
+            croak $log->error("Processing $file_name: ", $error);
         }
         $log->info("Parsed XML '$file_name' ok");