X-Git-Url: http://git.rot13.org/?p=perl-cwmp.git;a=blobdiff_plain;f=bin%2Fdump2test.pl;fp=bin%2Fdump2test.pl;h=c8024eacfd7931f8448f762d0545211129f3fb42;hp=e1c749835e6a3c7c0298967298e82972b5f36685;hb=06b8f1fa1fdf18da34fcc4b4d0e6878d9e2a58e3;hpb=f755333ab3304fb6a1a375bb0b8b06c532184f29

diff --git a/bin/dump2test.pl b/bin/dump2test.pl
index e1c7498..c8024ea 100755
--- a/bin/dump2test.pl
+++ b/bin/dump2test.pl
@@ -71,8 +71,11 @@ warn "dumping new tests into $test_path\n";
 foreach my $name ( keys %$requests ) {
 	my $from = $requests->{$name};
 	my $to   = "$test_path/$name";
+	if ( -e $to ) {
+		warn "SKIP $to\n";
+		next;
+	}
 	warn "## $from -> $to\n";
-	next if -e $to;
 	my $xml = read_file( $from );
 	write_file( $to, $xml );
 	DumpFile( "$to.yml", xml2state( $xml ) );