+++ /dev/null
-package CatalystX::HelpText::Role::HelpText;
-use Moose::Role;
-use Try::Tiny;
-
-requires 'expose_methods';
-
-around expose_methods => sub {
- my ($orig, $self, @args) = @_;
- my @m = $self->$orig(@args)->flatten;
- [ @m, 'help_text' ];
-};
-
-sub help_text {
- my ($self, $c, $key) = @_;
- try {
- return $c->model('Help')->get_help_text_for($c, $key);
- }
- catch {
- $c->log->warn("Error retrieving help_text: ".$_);
- return '';
- };
-}
-
-1;