From 7b3cdad55f83e0aa8cb68f6d724d7904bb410d65 Mon Sep 17 00:00:00 2001 From: Don Armstrong Date: Mon, 19 Mar 2012 14:25:43 -0700 Subject: [PATCH] clear croak messages in Debbugs::Common --- Debbugs/Common.pm | 2 ++ 1 file changed, 2 insertions(+) diff --git a/Debbugs/Common.pm b/Debbugs/Common.pm index 915fa85..283f33e 100644 --- a/Debbugs/Common.pm +++ b/Debbugs/Common.pm @@ -869,6 +869,8 @@ sub cleanup_eval_fail { } # ditch the "at foo/bar/baz.pm line 5" $error =~ s/\sat\s\S+\sline\s\d+//; + # ditch croak messages + $error =~ s/^\s{3,}.+//g; # ditch trailing multiple periods in case there was a cascade of # die messages. $error =~ s/\.+$/\./; -- 2.39.2