Commit | Line | Data |
---|---|---|
bf960837 | 1 | package LolCatalyst::Lite::Translator::Driver::LOLCAT; |
63ed6b50 | 2 | |
3 | use Moose; | |
4 | use Acme::LOLCAT (); | |
5 | use namespace::clean -except => 'meta'; | |
6 | ||
d0dd2387 | 7 | with 'LolCatalyst::Lite::Interface::TranslationDriver'; |
8 | ||
63ed6b50 | 9 | sub translate { |
10 | my ($self, $text) = @_; | |
11 | return Acme::LOLCAT::translate($text); | |
12 | } | |
13 | ||
14 | __PACKAGE__->meta->make_immutable; | |
15 | ||
16 | 1; |