X-Git-Url: http://git.vpit.fr/?a=blobdiff_plain;f=lib%2FTest%2FValgrind%2FAction%2FCaptor.pm;h=f6de1037478061e4bd14bf42a074d88ebed9c8a8;hb=b34179155630f5f4cbea1749af4054a746ded9a4;hp=85eb5127904e0e89616f4928ee741cf20dfeed6a;hpb=9314897b9f4c46057ac5147c0fb4c8fc6dd466a9;p=perl%2Fmodules%2FTest-Valgrind.git diff --git a/lib/Test/Valgrind/Action/Captor.pm b/lib/Test/Valgrind/Action/Captor.pm index 85eb512..f6de103 100644 --- a/lib/Test/Valgrind/Action/Captor.pm +++ b/lib/Test/Valgrind/Action/Captor.pm @@ -9,11 +9,11 @@ Test::Valgrind::Action::Captor - Mock Test::Valgrind::Action for capturing outpu =head1 VERSION -Version 1.12 +Version 1.17 =cut -our $VERSION = '1.12'; +our $VERSION = '1.17'; =head1 DESCRIPTION @@ -50,7 +50,10 @@ sub _dup_fh { or $_[0]->_croak('open(' . fileno($_[1]) . ", '$_[2]&', $fd): $!"); } -=head2 C +=head2 C + + $tva->save_fh($from, $mode); + $tva->save_fh($from, $mode, $to); Save the original filehandle C<$from> opened with mode C<$mode>, and redirect it to C<$to> if it's defined or to F otherwise. @@ -78,6 +81,8 @@ sub save_fh { =head2 C + $tva->restore_all_fh; + Restore all the filehandles that were saved with L to their original state. The redirections aren't closed. @@ -127,7 +132,7 @@ You can find documentation for this module with the perldoc command. =head1 COPYRIGHT & LICENSE -Copyright 2009,2010,2011 Vincent Pit, all rights reserved. +Copyright 2009,2010,2011,2013,2015 Vincent Pit, all rights reserved. This program is free software; you can redistribute it and/or modify it under the same terms as Perl itself.