The following commit has been merged in the master branch:
commit 0f5379810c9289dafac8aeb01cba24ade32ae85e
Author: Niels Thykier <[email protected]>
Date: Fri Jan 25 21:30:21 2013 +0100
L::Util: Use croak instead of die in fail()
... so it is possible to get a full trace by using -MCarp=verbose (in
PERL5OPT).
Signed-off-by: Niels Thykier <[email protected]>
diff --git a/lib/Lintian/Util.pm b/lib/Lintian/Util.pm
index 49b4f28..a42f29b 100644
--- a/lib/Lintian/Util.pm
+++ b/lib/Lintian/Util.pm
@@ -970,16 +970,14 @@ sub fail {
if (@_) {
$str .= join " ", @_;
} else {
- my (undef, $filename, $line) = caller;
if ($!) {
$str .= "$!";
} else {
$str .= "No context.";
}
- $str .= " (called from $filename:$line)\n";
}
$! = 2; # set return code outside eval()
- die $str;
+ croak $str;
}
=item check_path (CMD)
--
Debian package checker
--
To UNSUBSCRIBE, email to [email protected]
with a subject of "unsubscribe". Trouble? Contact [email protected]
Archive: http://lists.debian.org/[email protected]
