Parent Directory
| 
Revision Log
| 
Patch
| Revision 1396 | Revision 1397 | ||
|---|---|---|---|
| … | … | ||
| 79 | } | 79 | } |
| 80 | 80 | ||
| 81 | sub readDirectory($) { | 81 | sub readDirectory($) { |
| 82 | my $dirName = shift; | 82 | my $dirName = shift; |
| 83 | opendir my $dh, $dirName | 83 | opendir my $dh, $dirName |
| 84 | or die "failed to read directory $dirName: $!"; | 84 | or die "Failed to read directory $dirName. Please check that", |
| 85 | "webserver has permission to read this directory. $!"; | ||
| 85 | my @result = readdir $dh; | 86 | my @result = readdir $dh; |
| 86 | close $dh; | 87 | close $dh; |
| 87 | return @result; | 88 | return @result; |
| 88 | } | 89 | } |
| 89 | 90 | ||
|
||||||||
| aubreyja at gmail dot com | ViewVC Help |
| Powered by ViewVC 1.0.9 |