X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FCatalyst%2FPAR.pm;h=0363c57c4601e61c63b9bee3544d9f126d0b91af;hb=0fa3b8e1ed85c4250e81c5523faaaa3dc6625de8;hp=fe336e67798d8444cd46692143583c854169cdfc;hpb=8079852cbaf8b7ef1a8ce97aec0a453bc76012d2;p=catagits%2FCatalyst-Runtime.git

diff --git a/lib/Catalyst/PAR.pm b/lib/Catalyst/PAR.pm
index fe336e6..0363c57 100644
--- a/lib/Catalyst/PAR.pm
+++ b/lib/Catalyst/PAR.pm
@@ -24,7 +24,7 @@ Package Catalyst Applications.
 
 =over 4
 
-=item $self->package( $par, $engine )
+=item $self->package(\%options)
 
 =cut
 
@@ -64,6 +64,10 @@ sub package {
     my $par_test = File::Spec->catfile( $FindBin::Bin, '..', 'par_test.pl' );
     unlink $par_test;
 
+    my $classes = '';
+    for my $req ( split ',', $options->{classes} ) {
+        $classes .= "require $req;\n";
+    }
     my $version  = $Catalyst::VERSION;
     my $class    = $options->{class};
     my $tmp_file = IO::File->new("> $par_test");
@@ -73,6 +77,7 @@ BEGIN { \$ENV{CATALYST_ENGINE} = '$engine' };
 use lib 'lib';
 require $class;
 import $class;
+$classes
 EOF
     $tmp_file->close;