From f25e828f8cc7101e302792dd4299c2834cf0a506 Mon Sep 17 00:00:00 2001 From: Marius Gavrilescu Date: Sun, 24 Aug 2014 00:09:21 +0300 Subject: [PATCH] Add correct directory to archive when vpk is not provided --- lib/App/Web/VPKBuilder.pm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/lib/App/Web/VPKBuilder.pm b/lib/App/Web/VPKBuilder.pm index ebeaa25..aec616d 100644 --- a/lib/App/Web/VPKBuilder.pm +++ b/lib/App/Web/VPKBuilder.pm @@ -64,7 +64,7 @@ sub makepkg { system $self->{cfg}{vpk} => $dest; push @zip_files, catfile $dir, "pkg.$self->{cfg}{vpk_extension}" } else { - find sub { push @zip_files, $File::Find::name if -f }, 'pkg'; + find sub { push @zip_files, $File::Find::name if -f }, $dest; } zip \@zip_files, catfile($dir, 'pkg.zip'), FilterName => sub { $_ = abs2rel $_, $dir }, -Level => 1; open my $fh, '<', catfile $dir, 'pkg.zip'; -- 2.30.2