Skip to content

Commit

Permalink
added a recheck of the create/checkout/commit cycle
Browse files Browse the repository at this point in the history
  • Loading branch information
jettero committed Apr 24, 2009
1 parent a6d7ba3 commit f3cdb05
Show file tree
Hide file tree
Showing 2 changed files with 24 additions and 0 deletions.
1 change: 1 addition & 0 deletions MANIFEST
Original file line number Original file line Diff line number Diff line change
Expand Up @@ -9,3 +9,4 @@ SVNReplay.pm
t/01_load.t t/01_load.t
t/05_svn_create_repo.t t/05_svn_create_repo.t
t/07_create_co_dirs.t t/07_create_co_dirs.t
t/09_check_out_s7repo.t
23 changes: 23 additions & 0 deletions t/09_check_out_s7repo.t
Original file line number Original file line Diff line number Diff line change
@@ -0,0 +1,23 @@

use Test;
use File::Spec;
use IPC::System::Simple qw(capturex);

die "re-test requires clean" if -d "s9.co";

my $r = File::Spec->rel2abs("s7.repo");
my $l = capturex(svn=>'co', "file://$r", 's9.co');

my @r = (
'^A\s+s9\.co/dir1$',
'^A\s+s9\.co/dir2$',
'^A\s+s9\.co/testdir$',
'^A\s+s9\.co/testdir/yikes$',
'^A\s+s9\.co/testdir/yikes/hard$',
'^A\s+s9\.co/testdir/yikes/hard/test$',
'^A\s+s9\.co/testdir/yikes/hard/test/recursive$',
'revision 3',
);

plan tests => int @r;
ok( $l =~ m/$_/m ) for @r;

0 comments on commit f3cdb05

Please sign in to comment.