Added Schreibgebrauch meta data test suite for Duden
Change-Id: I4d4efb43bc13e962e45bedee6a424a909939f3bb
diff --git a/script/korapxml2krill_dir b/script/korapxml2krill_dir
index 1f8ec14..b9db239 100644
--- a/script/korapxml2krill_dir
+++ b/script/korapxml2krill_dir
@@ -86,7 +86,7 @@
$call .= ' -y ' . $pretty if $pretty;
$call .= ' -a ' . $_ foreach @allow;
$call .= ' -s ' . $_ foreach @skip;
- print $file;
+ print "$file ";
system($call);
print "\n";
};
@@ -106,7 +106,7 @@
my $count = scalar @dirs;
for (my $i = 0; $i < $count; $i++) {
- print "Convert [$i/$count] ";
+ print 'Convert [' . ($i + 1) . "/$count] ";
write_file($dirs[$i]);
};