From 06b8f1fa1fdf18da34fcc4b4d0e6878d9e2a58e3 Mon Sep 17 00:00:00 2001
From: Dobrica Pavlinusic <dpavlin@rot13.org>
Date: Tue, 4 Dec 2007 22:06:29 +0000
Subject: [PATCH]  r290@brr:  dpavlin | 2007-11-26 01:34:51 +0100  better
 output

git-svn-id: https://perl-cwmp.googlecode.com/svn/trunk@238 836a5e1a-633d-0410-964b-294494ad4392
---
 bin/dump2test.pl | 5 ++++-
 1 file changed, 4 insertions(+), 1 deletion(-)

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 ) );
-- 
2.20.1