diff --git a/Koha/Suggestion.pm b/Koha/Suggestion.pm index fc31513cc2..339116df51 100644 --- a/Koha/Suggestion.pm +++ b/Koha/Suggestion.pm @@ -170,6 +170,21 @@ sub manager { return Koha::Patron->_new_from_dbic($manager_rs); } +=head3 accepter + +my $accepter = $suggestion->accepter; + +Returns the accepter of the suggestion (Koha::Patron for acceptedby field) + +=cut + +sub accepter { + my ($self) = @_; + my $manager_rs = $self->_result->acceptedby; + return unless $manager_rs; + return Koha::Patron->_new_from_dbic($manager_rs); +} + =head3 rejecter my $rejecter = $suggestion->rejecter; diff --git a/koha-tmpl/intranet-tmpl/prog/en/modules/suggestion/suggestion.tt b/koha-tmpl/intranet-tmpl/prog/en/modules/suggestion/suggestion.tt index 806d9a1b26..ad235d56fa 100644 --- a/koha-tmpl/intranet-tmpl/prog/en/modules/suggestion/suggestion.tt +++ b/koha-tmpl/intranet-tmpl/prog/en/modules/suggestion/suggestion.tt @@ -13,7 +13,7 @@