Title: [opsview-perl] [780] Add -O (include_only), to only include filepaths matching a string.
Revision
780
Author
pknight
Date
2013-05-24 15:26:04 +0100 (Fri, 24 May 2013)

Log Message

Add -O (include_only), to only include filepaths matching a string.

Added Paths


Added: trunk/patches/PAR-Packer/02-include_only.patch
===================================================================
--- trunk/patches/PAR-Packer/02-include_only.patch	                        (rev 0)
+++ trunk/patches/PAR-Packer/02-include_only.patch	2013-05-24 14:26:04 UTC (rev 780)
@@ -0,0 +1,22 @@
+diff -bur PAR-Packer-1.013.orig/lib/PAR/Packer.pm PAR-Packer-1.013/lib/PAR/Packer.pm
+--- PAR-Packer-1.013.orig/lib/PAR/Packer.pm	2013-05-24 13:56:04.000000000 +0000
++++ PAR-Packer-1.013/lib/PAR/Packer.pm	2013-05-24 13:56:26.000000000 +0000
+@@ -59,6 +59,7 @@
+     'm|multiarch'    => 'Build PAR file for multiple architectures',
+     'n|noscan'       => 'Skips static scanning',
+     'o|output:s'     => 'Output file',
++    'O|include_only:s' => 'Include-only filepath match',
+     'p|par'          => 'Generate PAR file',
+     'P|perlscript'   => 'Generate perl script',
+     'r|run'          => 'Run the resulting executable',
+@@ -801,6 +802,10 @@
+             ($map{$pfile} eq "$archlib/$pfile")
+         );
+ 
++        next
++          if $opt->{O}
++          and $map{$pfile} !~ /\Q${\( $self->{options}{include_only} )}/;
++
+         $self->_vprint(2, "... adding $map{$pfile} as ${root}lib/$pfile");
+ 
+         if ($text{$pfile} or $pfile =~ /utf8_heavy\.pl$/i) {

_______________________________________________
Opsview-checkins mailing list
Opsview-checkins@lists.opsview.org
http://lists.opsview.org/lists/listinfo/opsview-checkins

Reply via email to