--- loncom/publisher/lonpubdir.pm 2001/08/20 20:13:40 1.14
+++ loncom/publisher/lonpubdir.pm 2001/11/29 20:03:03 1.15
@@ -101,8 +101,19 @@ sub handler {
my $extension='';
if ($filename=~/\.(\w+)$/) { $extension=$1; }
- if (($extension ne 'meta') &&
- (&Apache::lonnet::fileembstyle($extension))) {
+ if ($cmode&$dirptr) {
+ my $disfilename=$filename;
+ if ($filename eq '..') {
+ $disfilename='Parent Directory';
+ }
+ unless ((($filename eq '..') && ($thisdisfn eq '')) ||
+ ($filename eq '.')) {
+ $r->print('
'.$disfilename.
+ ' | '.localtime($cmtime).' | | |
'
+ );
+ }
+ } elsif (&Apache::lonnet::fileembstyle($extension) ne 'hdn') {
my $status='Unpublished';
my $bgcol='#FFBBBB';
if (-e $resdir.'/'.$filename) {
@@ -132,21 +143,8 @@ sub handler {
''.
'Publish | ');
- } elsif ($cmode&$dirptr) {
- my $disfilename=$filename;
- if ($filename eq '..') {
- $disfilename='Parent Directory';
- }
- unless ((($filename eq '..') && ($thisdisfn eq '')) ||
- ($filename eq '.')) {
- $r->print(''.$disfilename.
- ' | '.localtime($cmtime).' | | |
'
- );
- }
} else {
- #no extension that we know of and not a directory
- #just hide it away
+ # "hidden" extension and not a directory, so hide it away.
}
}
closedir(DIR);