|
|
|
@ -90,6 +90,16 @@ elsif ($upload_mode eq "scp") {
|
|
|
|
|
print STDOUT "\$ $cmd\n"; |
|
|
|
|
system($cmd); |
|
|
|
|
|
|
|
|
|
# schedule VCS synchronization |
|
|
|
|
if (`uname -s` =~ m/^FreeBSD\n?$/s) { |
|
|
|
|
my $jobs = `at -qZ -l 2>/dev/null`; |
|
|
|
|
$jobs =~ s/^[^\n]+\n//s; |
|
|
|
|
foreach my $job ($jobs =~ m/\s+(\d+)[^ \t]*$/mg) { |
|
|
|
|
system("at -r $job >/dev/null 2>&1 || true"); |
|
|
|
|
} |
|
|
|
|
system("echo 'mtn --quiet sync >/dev/null 2>&1' | at -qZ '+ 15 minutes'"); |
|
|
|
|
} |
|
|
|
|
|
|
|
|
|
# final hint |
|
|
|
|
print STDOUT "\033[32m++ PACKAGE RELEASED\033[0m\n"; |
|
|
|
|
|
|
|
|
|