Changeset 5890

Timestamp:

07/06/09 22:54:42 (3 years ago)

Author:

ryan52

Message:

print the directory too

File:

• trunk/Locale-Msgfmt/lib/Locale/Msgfmt.pm (modified) (1 diff)

trunk/Locale-Msgfmt/lib/Locale/Msgfmt.pm

@@ -77 +77 @@
         File::Path::mkpath( $hash->{out} );
     }
+    print $hash->{in} . " -> " . $hash->{out} . "\n" if ( $hash->{verbose} );
     opendir my $D, $hash->{in} or die "Could not open ($hash->{in}) $!";
     my @list = readdir $D;