diff --git a/lib/WebGUI/Config.pm b/lib/WebGUI/Config.pm index a7cfde956..fb2c3d0f2 100644 --- a/lib/WebGUI/Config.pm +++ b/lib/WebGUI/Config.pm @@ -158,7 +158,7 @@ sub new { my $filename = shift; my $noCache = shift; if (!File::Spec->file_name_is_absolute($filename)) { - Cwd::realpath($filename = File::Spec->catfile(WebGUI::Paths->configBase, $filename)); + $filename = Cwd::realpath(File::Spec->catfile(WebGUI::Paths->configBase, $filename)); } if (exists $config{$filename}) { return $config{$filename}; diff --git a/t/Pluggable.t b/t/Pluggable.t index 0dfc4a0db..bd8bf280a 100644 --- a/t/Pluggable.t +++ b/t/Pluggable.t @@ -65,7 +65,8 @@ is($dumper->Dump, q|$VAR1 = { #---------------------------------------------------------------------------- # Test find and findAndLoad { # Block to localize @INC - local @INC = ( File::Spec->catdir( WebGUI::Test->getTestCollateralPath, 'Pluggable', 'lib' ); + my $lib = File::Spec->catdir( WebGUI::Test->getTestCollateralPath, 'Pluggable', 'lib' ); + local @INC = ( $lib ); # Use the i18n files to test my @testFiles = ();