Updated PAR support
Sebastian Riedel [Thu, 17 Nov 2005 05:35:59 +0000 (05:35 +0000)]
lib/Catalyst/Helper.pm
lib/Catalyst/PAR.pm

index 1bf824c..f311017 100644 (file)
@@ -992,25 +992,28 @@ use Getopt::Long;
 use Pod::Usage;
 use Catalyst::PAR;
 
-my $core = 0;
-my $engine = 'CGI';
-my $help = 0;
-my $par = '[% appprefix %].par';
+my $core      = 0;
+my $engine    = 'CGI';
+my $help      = 0;
+my $multiarch = 0;
+my $par       = '[% appprefix %].par';
 
 GetOptions(
-    'core'     => \$core,
-    'engine=s' => \$engine,
-    'help|?'   => \$help,
-    'par=s'    => \$par
+    'core'      => \$core,
+    'engine=s'  => \$engine,
+    'help|?'    => \$help,
+    'multiarch' => \$multiarch,
+    'par=s'     => \$par
 );
 
 pod2usage(1) if $help;
 
 Catalyst::PAR->new->package( {
-    core   => $core,
-    engine => $engine,
-    par    => $par,
-    class  => '[% name %]'
+    core      => $core,
+    engine    => $engine,
+    par       => $par,
+    multiarch => $multiarch,
+    class     => '[% name %]'
 } );
 
 1;
@@ -1024,10 +1027,11 @@ Catalyst::PAR->new->package( {
 [% appprefix %]_package.pl
 
  Options:
-   -core     also include modules bundled with Perl (defaults to false)
-   -engine   engine to use for dependency detection (defaults to CGI)
-   -help     display this help and exits
-   -par      name for the par archive (defaults to [% appprefix %].par)
+   -core         also include modules bundled with Perl (defaults to false)
+   -engine       engine to use for dependency detection (defaults to CGI)
+   -help         display this help and exits
+   -multiarch    enable multiarch support (defaults to false)
+   -par          name for the par archive (defaults to [% appprefix %].par)
 
  Examples:
    [% appprefix %]_package.pl [% appprefix %].par FastCGI
index d6370ec..fe336e6 100644 (file)
@@ -86,7 +86,8 @@ EOF
         'o' => $par,
         'a' => [@files],
         'p' => 1,
-        'B' => $options->{core}
+        'B' => $options->{core},
+        'm' => $options->{multiarch}
     );
     App::Packer::PAR->new(
         frontend  => 'Module::ScanDeps',