X-Git-Url: https://git.donarmstrong.com/?p=debbugs.git;a=blobdiff_plain;f=Debbugs%2FCorrespondent.pm;h=0044347955cd3c220ea0b258e7d12e40017e46c3;hp=bb075047d1022662ece4f909a864ec0066c4ef72;hb=2e8eff199aeb03c5a4a1e8de517197070bb209d8;hpb=2348614dbfe7e611aabc50ee31561d2f2e702e82

diff --git a/Debbugs/Correspondent.pm b/Debbugs/Correspondent.pm
index bb07504..0044347 100644
--- a/Debbugs/Correspondent.pm
+++ b/Debbugs/Correspondent.pm
@@ -80,6 +80,14 @@ sub submitter_url {
     return $config{web_domain}.'/submitter:'.$self->email;
 }
 
+sub CARP_TRACE {
+    my $self = shift;
+    return 'Debbugs::Correspondent={name='.$self->name.'}';
+}
+
+
+__PACKAGE__->meta->make_immutable;
+
 no Mouse;
 1;