fixed read_file()

diff --git a/tools/PM-Pod2html-snippet.pl b/tools/PM-Pod2html-snippet.pl
index 63ae764..8f73aa2 100644 (file)
--- a/tools/PM-Pod2html-snippet.pl
+++ b/tools/PM-Pod2html-snippet.pl
@@ -42,7 +42,6 @@ sub read_file
        foreach(@files)
        {
                read_file($_) if(-d $_);
-               carp "Invalid directory $_" if !(-d $_);
                if($_ =~ /\.pod$/i)
                {
                        my $file_name   = $_;