[Catalyst-commits] r6911 - trunk/Catalyst-Plugin-ConfigLoader-Remote/lib/Catalyst/Plugin/ConfigLoader

jshirley at dev.catalyst.perl.org jshirley at dev.catalyst.perl.org
Mon Sep 17 20:01:55 GMT 2007


Author: jshirley
Date: 2007-09-17 20:01:55 +0100 (Mon, 17 Sep 2007)
New Revision: 6911

Modified:
   trunk/Catalyst-Plugin-ConfigLoader-Remote/lib/Catalyst/Plugin/ConfigLoader/Remote.pm
Log:
Proper inheritance

Modified: trunk/Catalyst-Plugin-ConfigLoader-Remote/lib/Catalyst/Plugin/ConfigLoader/Remote.pm
===================================================================
--- trunk/Catalyst-Plugin-ConfigLoader-Remote/lib/Catalyst/Plugin/ConfigLoader/Remote.pm	2007-09-17 18:42:02 UTC (rev 6910)
+++ trunk/Catalyst-Plugin-ConfigLoader-Remote/lib/Catalyst/Plugin/ConfigLoader/Remote.pm	2007-09-17 19:01:55 UTC (rev 6911)
@@ -7,6 +7,8 @@
 use Scalar::Util qw(blessed);
 use File::Temp qw/tempdir/;
 
+use base qw/Config::Plugin::ConfigLoader/;
+
 =head1 NAME
 
 Catalyst::Plugin::ConfigLoader::Remote - The great new Catalyst::Plugin::ConfigLoader::Remote!
@@ -56,7 +58,7 @@
     my @files   = ();
     my $tempdir = tempdir( CLEANUP => 1 );
 
-    my @incoming_files = $c->SUPER::find_files();
+    my @incoming_files = $c->next::method();
 
     # replace everything in @files that is a URI object with a downloaded copy
     foreach my $arg ( @incoming_files ) {




More information about the Catalyst-commits mailing list