fix bug with empty DANCER_APPDIR

This commit is contained in:
Oliver Gorwits
2012-12-20 13:20:59 +00:00
parent a5d2848cef
commit e90b3c9d7a

View File

@@ -10,7 +10,7 @@ use Path::Class;
our $VERSION = '2.00_009'; our $VERSION = '2.00_009';
BEGIN { BEGIN {
if (not length $ENV{DANCER_APPDIR} if (not length ($ENV{DANCER_APPDIR} '')
or not -f file($ENV{DANCER_APPDIR}, 'config.yml')) { or not -f file($ENV{DANCER_APPDIR}, 'config.yml')) {
my $auto = dir(dist_dir('App-Netdisco'))->absolute; my $auto = dir(dist_dir('App-Netdisco'))->absolute;