address cached config objects by full file name
This commit is contained in:
parent
7d60f7523e
commit
3703fb86d6
1 changed files with 3 additions and 3 deletions
|
|
@ -170,9 +170,9 @@ sub new {
|
||||||
my $webguiPath = Cwd::realpath(shift);
|
my $webguiPath = Cwd::realpath(shift);
|
||||||
my $filename = shift;
|
my $filename = shift;
|
||||||
my $noCache = shift;
|
my $noCache = shift;
|
||||||
my $fullPath = $webguiPath.'/etc/'.$filename;
|
my $fullPath = Cwd::realpath($webguiPath.'/etc/'.$filename);
|
||||||
if (exists $config{$filename}) {
|
if (exists $config{$fullPath}) {
|
||||||
return $config{$filename};
|
return $config{$fullPath};
|
||||||
} else {
|
} else {
|
||||||
my $self = Config::JSON->new($fullPath);
|
my $self = Config::JSON->new($fullPath);
|
||||||
register($self, $class);
|
register($self, $class);
|
||||||
|
|
|
||||||
Loading…
Add table
Add a link
Reference in a new issue