# HG changeset patch # User Matthias Förste # Date 1449133410 -3600 # Node ID a815b43eec44bde5dde700a0ef1cf437ed85893d # Parent 14ec9c4634f30f141535c9c5f42c0322736ae505 $ENV{HOME} may be unset which would produce a warning diff -r 14ec9c4634f3 -r a815b43eec44 wgnd-watch.pl --- a/wgnd-watch.pl Thu May 03 22:41:44 2012 +0200 +++ b/wgnd-watch.pl Thu Dec 03 10:03:30 2015 +0100 @@ -79,7 +79,7 @@ ) or pod2usage(); our $source; -use lib ('.', $ENV{HOME}, '/etc'); +use lib grep { defined } ('.', $ENV{HOME}, '/etc'); require $opts{map}; $0 = "$ME @ARGV";