Strip orig_ from method name in _global() and _load_attr()
This commit is contained in:
4
Info.pm
4
Info.pm
@@ -3413,7 +3413,7 @@ sub _global {
|
|||||||
my $raw = $method =~ /raw$/;
|
my $raw = $method =~ /raw$/;
|
||||||
|
|
||||||
my $attr = $method;
|
my $attr = $method;
|
||||||
$attr =~ s/^load_//;
|
$attr =~ s/^(load|orig)_//;
|
||||||
$attr =~ s/_raw$//;
|
$attr =~ s/_raw$//;
|
||||||
|
|
||||||
# Get the callback hash for data munging
|
# Get the callback hash for data munging
|
||||||
@@ -3726,7 +3726,7 @@ sub _load_attr {
|
|||||||
my $raw = $method =~ /raw$/;
|
my $raw = $method =~ /raw$/;
|
||||||
|
|
||||||
my $attr = $method;
|
my $attr = $method;
|
||||||
$attr =~ s/^load_//;
|
$attr =~ s/^(load|orig)_//;
|
||||||
$attr =~ s/_raw$//;
|
$attr =~ s/_raw$//;
|
||||||
|
|
||||||
# Return cached data unless loading or partial
|
# Return cached data unless loading or partial
|
||||||
|
|||||||
Reference in New Issue
Block a user