X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FApp%2FSCS%2FPageSet.pm;h=f5b9e5e9b63cd4e32ddb70e27338e8fc539f83a1;hb=3f8c59dbbe577b7bc9e014567ff8be8dc971a624;hp=208772ca195c1f02772942da1bd339be2fdbab75;hpb=2f5c23b346a1ad8317409082abd9a2a4a43337fc;p=scpubgit%2FApp-SCS.git diff --git a/lib/App/SCS/PageSet.pm b/lib/App/SCS/PageSet.pm index 208772c..f5b9e5e 100644 --- a/lib/App/SCS/PageSet.pm +++ b/lib/App/SCS/PageSet.pm @@ -67,16 +67,15 @@ sub _config_files_for { my @files = (); my @dirs = io->dir($path)->splitdir; - shift @dirs; pop @dirs; - my $buildpath = io(''); + my $build_path = io(''); foreach my $dir (@dirs) { - $buildpath = $buildpath->catdir("/$dir"); + $build_path = $build_path->catdir("/$dir"); #/home/.../share/pages/blog.conf etc - my $file = $self->_top_dir->catfile("$buildpath.conf"); + my $file = $self->_top_dir->catfile("$build_path.conf"); if (!$file->exists || !$file->file || $file->empty) { next;