mirror of
https://github.com/schoebel/mars
synced 2025-02-19 05:27:01 +00:00
marsadm: new lskip
This commit is contained in:
parent
911f7cb83d
commit
950e0ca258
@ -88,6 +88,15 @@ sub lprint_stderr {
|
|||||||
llog($text);
|
llog($text);
|
||||||
}
|
}
|
||||||
|
|
||||||
|
sub lskip {
|
||||||
|
my ($res, $text) = @_;
|
||||||
|
# Already set %skip_res here, so it doesn't count as error
|
||||||
|
$skip_res{$res} = 1;
|
||||||
|
lprint_stderr "SKIPPING: $text";
|
||||||
|
# trigger an exception
|
||||||
|
die "\n";
|
||||||
|
}
|
||||||
|
|
||||||
sub ldie {
|
sub ldie {
|
||||||
my ($text) = @_;
|
my ($text) = @_;
|
||||||
if ($verbose > 2) {
|
if ($verbose > 2) {
|
||||||
|
Loading…
Reference in New Issue
Block a user