make chkstow honour $STOW_DIR environment variable

Thanks to Matan Nassau for reporting this deficiency.
This commit is contained in:
Adam Spiers 2019-02-09 17:02:47 +00:00
parent 88ec3f58aa
commit 1a752bf70b
2 changed files with 2 additions and 1 deletions

1
THANKS
View file

@ -31,6 +31,7 @@ Kristoffer Haugsbakk
Hongyi Zhao Hongyi Zhao
Jean Louis Jean Louis
Daniel Shahaf Daniel Shahaf
Matan Nassau
Email addresses of new contributors are no longer being added by default Email addresses of new contributors are no longer being added by default
for privacy reasons; however please contact the maintainer if you are for privacy reasons; however please contact the maintainer if you are

View file

@ -8,7 +8,7 @@ require 5.006_001;
use File::Find; use File::Find;
use Getopt::Long; use Getopt::Long;
my $DEFAULT_TARGET = '/usr/local/'; my $DEFAULT_TARGET = $ENV{STOW_DIR} || '/usr/local/';
our $Wanted = \&bad_links; our $Wanted = \&bad_links;
our %Package = (); our %Package = ();