perl/libtest-mockclass-perl
1
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

Imported Upstream version 1.05

Browse Source
This commit is contained in:
Mario Fetka
2017-09-15 16:04:39 +02:00
parent ae1b1f5377
commit 563d8fdc61
5 changed files with 40 additions and 151 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
lib/Test/MockClass.pm
View File

@@ -279,8 +279,8 @@ BEGIN {
### Versioning stuff and custom includes
use vars qw{$VERSION $RCSID};
$VERSION = do { my @r = (q$Revision: 1.4 $ =~ /\d+/g); sprintf "%d."."%02d" x $#r, @r };
$RCSID = q$Id: MockClass.pm,v 1.4 2005/02/18 21:16:20 phaedrus Exp $;
$VERSION = do { my @r = (q$Revision: 1.5 $ =~ /\d+/g); sprintf "%d."."%02d" x $#r, @r };
$RCSID = q$Id: MockClass.pm,v 1.5 2005/02/18 21:16:20 phaedrus Exp $;
use Carp;
use Hook::WrapSub qw{wrap_subs unwrap_subs};
use Tie::Watch;