diff --git a/gopher.pl b/gopher.pl index 66ad2fd..8827bfe 100644 --- a/gopher.pl +++ b/gopher.pl @@ -96,6 +96,7 @@ sub map_content { sub filter_content { my ($dir_entry, $blog_dir) = @_; + return 0 unless -r $blog_dir."/".$dir_entry; return 1 unless (substr($dir_entry,0,1) eq "." || $dir_entry eq "header"); return 0; }