From: Steve Hancock <perltidy@users.sourceforge.net>
Date: Tue, 2 Jan 2024 15:41:31 +0000 (-0800)
Subject: simplify Die and Warn calls
X-Git-Tag: 20230912.12~21
X-Git-Url: https://git.donarmstrong.com/?a=commitdiff_plain;h=708d54f85afd7d91b066bc8e91630fa9b3907692;p=perltidy.git

simplify Die and Warn calls
---

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");
                 }
             }