Quellcode durchsuchen

Dpkg::Source::Package: Make $diff_ignore_default_regexp a true alias

If the users are modifying this variable, just copying the real one to
the public one will not do it, because changes will not be seen by the
module code. Instead create a real alias.

Regression introduced in commit 5ae4ce9c2dfddbb36e2e0fc24dde3a27196f00f1.
Guillem Jover vor 12 Jahren
Ursprung
Commit
453d2813b9
1 geänderte Dateien mit 2 neuen und 1 gelöschten Zeilen
  1. 2 1
      scripts/Dpkg/Source/Package.pm

+ 2 - 1
scripts/Dpkg/Source/Package.pm

@@ -79,7 +79,8 @@ $diff_ignore_default_regex =~ s/\n//sg;
 # Public variables
 # Public variables
 # XXX: Backwards compatibility, stop exporting on VERSION 2.00.
 # XXX: Backwards compatibility, stop exporting on VERSION 2.00.
 ## no critic (Variables::ProhibitPackageVars)
 ## no critic (Variables::ProhibitPackageVars)
-our $diff_ignore_default_regexp = $diff_ignore_default_regex;
+our $diff_ignore_default_regexp;
+*diff_ignore_default_regexp = \$diff_ignore_default_regex;
 
 
 no warnings 'qw'; ## no critic (TestingAndDebugging::ProhibitNoWarnings)
 no warnings 'qw'; ## no critic (TestingAndDebugging::ProhibitNoWarnings)
 our @tar_ignore_default_pattern = qw(
 our @tar_ignore_default_pattern = qw(