diff options
| -rwxr-xr-x | metas/perl.d/scrapecore | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/metas/perl.d/scrapecore b/metas/perl.d/scrapecore index 2e1aba3..25f5c80 100755 --- a/metas/perl.d/scrapecore +++ b/metas/perl.d/scrapecore @@ -206,9 +206,9 @@ sub _delmatch sub coreonly { my %mods = map { @$_ } @_; - my $var = $ENV{'PKGVAR'} || "$ENV{'HOME'}/var"; + my $var = $ENV{'PKGVAR'} || "$ENV{'HOME'}/.genpkg/var"; my $path = "$var/cpanmods"; - open(my $if, '<', $path) or die("open $path: $!"); + open(my $if, '<', $path) or die("open $path failed: $!"); my @dists; local $/ = qq{\n\n}; |