fix up code to 404

[catagits/catbook-code.git] / lib / LolCatalyst / Lite / Snippet.pm

diff --git a/lib/LolCatalyst/Lite/Snippet.pm b/lib/LolCatalyst/Lite/Snippet.pm
index abccf30..5beefcd 100644 (file)
--- a/lib/LolCatalyst/Lite/Snippet.pm
+++ b/lib/LolCatalyst/Lite/Snippet.pm
@@ -5,7 +5,10 @@ use namespace::clean -except => 'meta';
 
 has 'id' => (is => 'ro', required => 1);
 has 'text' => (is => 'ro', required => 1);
-has '_translator' => (is => 'ro', required => 1, init_arg => 'translator');
+has '_translator' => (
+  is => 'ro', required => 1, init_arg => 'translator',
+  handles => [ 'can_translate_to' ],
+);
 
 sub translated {
   my ($self) = @_;