X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FReaction%2FUI%2FWidgetClass.pm;h=0b3e62f4d0356d0566890c0b139ede6640792ea3;hb=bd1aa0c203d4e2c70aeb2ced17ad023d2a27dd8f;hp=b1c88c0ca7cbd62c592078feed74a66134685350;hpb=2f6669e1c3ed4be76fff219c0e259d37a99da392;p=catagits%2FReaction.git

diff --git a/lib/Reaction/UI/WidgetClass.pm b/lib/Reaction/UI/WidgetClass.pm
index b1c88c0..0b3e62f 100644
--- a/lib/Reaction/UI/WidgetClass.pm
+++ b/lib/Reaction/UI/WidgetClass.pm
@@ -95,6 +95,10 @@ override exports_for_package => sub {
         qq{$_="${text}"};
       } keys %$attrs);
     },
+    implements => sub {
+      my ($name, $sub) = @_;
+      $package->meta->add_method($name, $sub);
+    },
   );
 };
 override default_base => sub { ('Reaction::UI::Widget') };