diff options
Diffstat (limited to 'solenv/bin/deliver.pl')
-rwxr-xr-x | solenv/bin/deliver.pl | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/solenv/bin/deliver.pl b/solenv/bin/deliver.pl index a3e0450f4e08..74ed2020184a 100755 --- a/solenv/bin/deliver.pl +++ b/solenv/bin/deliver.pl @@ -339,6 +339,7 @@ sub do_symlink $line = expand_macros($line); ($from, $to) = split(' ',$line); + my $fullfrom = $from; if ( dirname($from) eq dirname($to) ) { $from = basename($from); } @@ -369,7 +370,7 @@ sub do_symlink push_on_ziplist($to) if $opt_zip; return; } - + return unless -e $fullfrom; print "SYMLIB: $from -> $to\n" if $opt_verbose; if ( !symlink("$from", "$to") ) { print_error("can't symlink $from -> $to: $!",0); |