Don't error out, either warn or say nothing, depending.

master
Amitai Schlair 2009-09-11 17:42:51 -04:00
parent 5a627f1853
commit 604037b0f2
1 changed files with 7 additions and 13 deletions

View File

@ -7,7 +7,6 @@ use IkiWiki 3.00;
sub import {
hook(type => "getsetup", id => "rsync", call => \&getsetup);
hook(type => "checkconfig", id => "rsync", call => \&checkconfig);
hook(type => "postrefresh", id => "rsync", call => \&postrefresh);
}
@ -26,19 +25,14 @@ sub getsetup () {
},
}
sub checkconfig {
if (! exists $config{rsync_command} ||
! defined $config{rsync_command}) {
error("Must specify rsync_command");
}
}
sub postrefresh () {
system $config{rsync_command};
if ($? == -1) {
error("failed to execute rsync_command: $!");
} elsif ($? != 0) {
error(sprintf("rsync_command exited %d", $? >> 8));
if (defined $config{rsync_command}) {
system $config{rsync_command};
if ($? == -1) {
warn("failed to execute rsync_command: $!");
} elsif ($? != 0) {
warn(sprintf("rsync_command exited %d", $? >> 8));
}
}
}