X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?p=catagits%2Fcatbook-code.git;a=blobdiff_plain;f=lib%2FLolCatalyst%2FLite%2FTranslator.pm;h=8832943700351840e72aed594f0b2f10ff7e1fb6;hp=05122a12dfd46a1b2afa98efa92ed51e4ef9b846;hb=e639dea98fb69c9382b0823026d8a62111d3053b;hpb=bab4d401f03e888505bb316de80e40cc79171283

diff --git a/lib/LolCatalyst/Lite/Translator.pm b/lib/LolCatalyst/Lite/Translator.pm
index 05122a1..8832943 100644
--- a/lib/LolCatalyst/Lite/Translator.pm
+++ b/lib/LolCatalyst/Lite/Translator.pm
@@ -38,6 +38,11 @@ sub translate {
   $self->translate_to($self->default_target, $text);
 }
 
+sub can_translate_to {
+  my ($self, $target) = @_;
+  return exists $self->_translators->{$target};
+}
+
 sub translate_to {
   my ($self, $target, $text) = @_;
   $self->_translators->{$target}->translate($text);