=over 4
-=item $self->package( $par, $engine )
+=item $self->package(\%options)
=cut
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");
use lib 'lib';
require $class;
import $class;
+$classes
EOF
$tmp_file->close;
local $SIG{__WARN__} = sub { };
open my $olderr, '>&STDERR';
open STDERR, '>', File::Spec->devnull;
- my %opt = ( 'x' => 1, 'n' => 0, 'o' => $par, 'a' => [@files], 'p' => 1 );
+ my %opt = (
+ 'x' => 1,
+ 'n' => 0,
+ 'o' => $par,
+ 'a' => [@files],
+ 'p' => 1,
+ 'B' => $options->{core},
+ 'm' => $options->{multiarch}
+ );
App::Packer::PAR->new(
frontend => 'Module::ScanDeps',
backend => 'PAR::Packer',