From 708d54f85afd7d91b066bc8e91630fa9b3907692 Mon Sep 17 00:00:00 2001
From: Steve Hancock <perltidy@users.sourceforge.net>
Date: Tue, 2 Jan 2024 07:41:31 -0800
Subject: [PATCH] simplify Die and Warn calls

---
 lib/Perl/Tidy/Formatter.pm | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/lib/Perl/Tidy/Formatter.pm b/lib/Perl/Tidy/Formatter.pm
index 754d6d03..88e4d6f4 100644
--- a/lib/Perl/Tidy/Formatter.pm
+++ b/lib/Perl/Tidy/Formatter.pm
@@ -9840,11 +9840,11 @@ sub initialize_call_paren_style {
 
                 # words must be simple identifiers, or '&'
                 if ( $word !~ /^(?:\&|\w+)$/ || $word =~ /^\d/ ) {
-                    Perl::Tidy::Die(
+                    Die(
                         "Unexpected word in --$opt_name: '$word'\n");
                 }
                 if ( $iter && defined( $call_paren_style{$word} ) ) {
-                    Perl::Tidy::Warn(
+                    Warn(
                         "'$word' occurs in both -nwcp and -wcp, using -wcp\n");
                 }
             }
-- 
2.39.5