Add the "TB ---" prefix to error and warning messages so that early
failures (e.g. failure to lock the sandbox) don't result in empty failure reports.
This commit is contained in:
parent
929b31ddab
commit
e89ab6e083
Notes:
svn2git
2020-12-20 02:59:44 +00:00
svn path=/head/; revision=121094
@ -72,7 +72,7 @@ sub message(@) {
|
||||
|
||||
sub warning(@) {
|
||||
|
||||
my $msg = join(' ', @_);
|
||||
my $msg = join(' ', "TB ---", @_);
|
||||
chomp($msg);
|
||||
warn("$msg\n");
|
||||
return undef;
|
||||
@ -80,7 +80,7 @@ sub warning(@) {
|
||||
|
||||
sub error(@) {
|
||||
|
||||
my $msg = join(' ', "ERROR:", @_);
|
||||
my $msg = join(' ', "TB ---", "ERROR:", @_);
|
||||
chomp($msg);
|
||||
die("$msg\n");
|
||||
return undef;
|
||||
|
Loading…
Reference in New Issue
Block a user