[Catalyst-commits] r12754 - trunk/Catalyst-Plugin-UploadProgress/lib/Catalyst/Plugin

t0m at dev.catalyst.perl.org t0m at dev.catalyst.perl.org
Thu Jan 28 00:15:32 GMT 2010


Author: t0m
Date: 2010-01-28 00:15:32 +0000 (Thu, 28 Jan 2010)
New Revision: 12754

Modified:
   trunk/Catalyst-Plugin-UploadProgress/lib/Catalyst/Plugin/UploadProgress.pm
Log:
Use the modules we use, require all the methods we wrap

Modified: trunk/Catalyst-Plugin-UploadProgress/lib/Catalyst/Plugin/UploadProgress.pm
===================================================================
--- trunk/Catalyst-Plugin-UploadProgress/lib/Catalyst/Plugin/UploadProgress.pm	2010-01-28 00:13:19 UTC (rev 12753)
+++ trunk/Catalyst-Plugin-UploadProgress/lib/Catalyst/Plugin/UploadProgress.pm	2010-01-28 00:15:32 UTC (rev 12754)
@@ -1,9 +1,17 @@
 package Catalyst::Plugin::UploadProgress;
 use Moose::Role;
+use Catalyst::Exception;
 use namespace::autoclean;
 
 our $VERSION = '0.05';
 
+requires qw/
+    prepare_body_chunk
+    prepare_body
+    dispatch
+    setup_finalize
+/;
+
 # I'm concerned that this doesn't call super() at all..
 around 'prepare_body_chunk' => sub {
     my ( $orig, $c, $chunk ) = @_;




More information about the Catalyst-commits mailing list