X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=Debbugs%2FBug.pm;h=4af9b735f071041adf7b73827d8fc41ea6a73dc6;hb=cc06d9ad3fdd35582118b87fa1b2be5d5b0de7db;hp=641881a8fcb849b7568b959a2c6a245ffb1d151d;hpb=b12ebdaa6068e5bb808f4ff480d832e970fd3520;p=debbugs.git diff --git a/Debbugs/Bug.pm b/Debbugs/Bug.pm index 641881a..4af9b73 100644 --- a/Debbugs/Bug.pm +++ b/Debbugs/Bug.pm @@ -446,13 +446,18 @@ sub _build_archived { return $_[0]->location eq 'archived'?1:0; } -has tags => (is => 'ro', isa => 'Object', +has tags => (is => 'ro', + isa => 'Debbugs::Bug::Tag', clearer => '_clear_tags', builder => '_build_tags', lazy => 1, ); sub _build_tags { - return Debbugs::Bug::Tag->new($_[0]->status->{keywords}); + my $self = shift; + return Debbugs::Bug::Tag->new(keywords => $self->status->{keywords}, + bug => $self, + users => $self->bug_collection->users, + ); } =item buggy