r62503 - in /trunk/libtest-harness-perl/debian/patches: fix-whatis.patch manpage-error.patch

[periapt-guest at users.alioth.debian.org]

Author: periapt-guest
Date: Sun Sep 12 22:34:45 2010
New Revision: 62503

URL: http://svn.debian.org/wsvn/pkg-perl/?sc=1&rev=62503
Log:
restoring old patches

Modified:
    trunk/libtest-harness-perl/debian/patches/fix-whatis.patch
    trunk/libtest-harness-perl/debian/patches/manpage-error.patch

Modified: trunk/libtest-harness-perl/debian/patches/fix-whatis.patch
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libtest-harness-perl/debian/patches/fix-whatis.patch?rev=62503&op=diff
==============================================================================
--- trunk/libtest-harness-perl/debian/patches/fix-whatis.patch (original)
+++ trunk/libtest-harness-perl/debian/patches/fix-whatis.patch Sun Sep 12 22:34:45 2010
@@ -15,24 +15,3 @@
  
  Test::Harness is responsible for running test scripts, analysing
  their output and reporting success or failure. When I type 
-@@ -226,7 +230,8 @@
-   use base qw( TAP::Harness ); use YAML;
- 
-   sub summary {
--    my ( $self, $aggregate ) = @_; print Dump( $aggregate );
-+    my ( $self, $aggregate ) = @_; 
-+    print Dump( $aggregate );
-     $self->SUPER::summary( $aggregate );
-   }
- 
-@@ -261,8 +266,8 @@
- 
-   my $app = App::Prove->new;
- 
--  # Use custom TAP::Harness subclass $app->harness( 'My::TAP::Harness'
--  );
-+  # Use custom TAP::Harness subclass
-+  $app->harness( 'My::TAP::Harness' );
- 
-   $app->process_args( @ARGV ); exit( $app->run ? 0 : 1 );
- 

Modified: trunk/libtest-harness-perl/debian/patches/manpage-error.patch
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libtest-harness-perl/debian/patches/manpage-error.patch?rev=62503&op=diff
==============================================================================
--- trunk/libtest-harness-perl/debian/patches/manpage-error.patch (original)
+++ trunk/libtest-harness-perl/debian/patches/manpage-error.patch Sun Sep 12 22:34:45 2010
@@ -4,15 +4,7 @@
 Last-Update: 2010-08-15
 --- a/bin/prove
 +++ b/bin/prove
-@@ -44,6 +44,7 @@
-  -p,  --parse           Show full list of TAP parse errors, if any.
-       --directives      Only show results with TODO or SKIP directives.
-       --timer           Print elapsed time after each test.
-+      --trap            Trap Ctrl-C and print summary on interrupt.
-       --normalize       Normalize TAP output in verbose output
-  -T                     Enable tainting checks.
-  -t                     Enable tainting warnings.
-@@ -72,7 +73,7 @@
+@@ -72,7 +72,7 @@
  
  =head1 NOTES
  
@@ -21,30 +13,3 @@
  
  If F<~/.proverc> or F<./.proverc> exist they will be read and any
  options they contain processed before the command line options. Options
-@@ -152,6 +153,11 @@
- get confused. Use this option only if you understand the consequences
- and can live with the risk.
- 
-+=head2 C<--trap>
-+
-+The C<--trap> option will attempt to trap SIGINT (Ctrl-C) during a test
-+run and display the test summary even if the run is interrupted
-+
- =head2 C<--state>
- 
- You can ask C<prove> to remember the state of previous test runs and
-@@ -296,10 +302,13 @@
-   prove --source MyCustom \
-         --source Perl --perl-option 'foo=bar baz' --perl-option avg=0.278 \
-         --source File --file-option extensions=.txt --file-option extensions=.tmp t
-+        --source pgTAP --pgtap-option pset=format=html --pgtap-option pset=border=2
- 
- Each C<--$source-option> option must specify a key/value pair separated by an
- C<=>. If an option can take multiple values, just specify it multiple times,
--as with the C<extensions=> examples above.
-+as with the C<extensions=> examples above. If the option should be a hash
-+reference, specify the value as a second pair separated by a C<=>, as in the
-+C<pset=> examples above (escape C<=> with a backslash).
- 
- All C<--sources> are combined into a hash, and passed to L<TAP::Harness/new>'s
- C<sources> parameter.