From 71e0af477d86153658433d24adfffcf7952f2892 Mon Sep 17 00:00:00 2001 From: Stefano Lattarini Date: Mon, 27 May 2013 12:24:02 +0200 Subject: [PATCH] Automake::Rule: make private variables lexically scoped * lib/Automake/Rule.pm (@_known_extensions_list): This one. (@_suffixes): And this one. (%_rule_dict): And this one. Signed-off-by: Stefano Lattarini --- lib/Automake/Rule.pm | 9 ++++----- 1 file changed, 4 insertions(+), 5 deletions(-) diff --git a/lib/Automake/Rule.pm b/lib/Automake/Rule.pm index ed1fa24e6..a6492caec 100644 --- a/lib/Automake/Rule.pm +++ b/lib/Automake/Rule.pm @@ -98,8 +98,9 @@ non-object). my $_SUFFIX_RULE_PATTERN = '^(\.[a-zA-Z0-9_(){}$+@\-]+)(\.[a-zA-Z0-9_(){}$+@\-]+)' . "\$"; -# Suffixes found during a run. -use vars '@_suffixes'; +my @_suffixes = (); +my @_known_extensions_list = (); +my %_rule_dict = (); =item C<%dependencies> @@ -167,9 +168,8 @@ New extensions should be registered with C. =cut -use vars qw ($KNOWN_EXTENSIONS_PATTERN @_known_extensions_list); +use vars qw ($KNOWN_EXTENSIONS_PATTERN); $KNOWN_EXTENSIONS_PATTERN = ""; -@_known_extensions_list = (); =back @@ -278,7 +278,6 @@ rules defined so far.) =cut -use vars '%_rule_dict'; sub rules () { return values %_rule_dict; -- 2.47.2