version 1.31, 2002/01/06 01:29:52
|
version 1.34, 2002/01/17 14:10:44
|
Line 41
|
Line 41
|
# 8/28,10/15,11/28,11/29 Scott Harrison |
# 8/28,10/15,11/28,11/29 Scott Harrison |
# 11/30 Matthew Hall |
# 11/30 Matthew Hall |
# 12/11,12/13 Scott Harrison |
# 12/11,12/13 Scott Harrison |
|
# YEAR=2002 |
|
# 1/17 Scott Harrison |
# |
# |
### |
### |
|
|
Line 483 sub match_ext {
|
Line 485 sub match_ext {
|
if ($fnptr == 0 and $unpackline[3] ne "") { |
if ($fnptr == 0 and $unpackline[3] ne "") { |
my $embstyle = &Apache::loncommon::fileembstyle($fext); |
my $embstyle = &Apache::loncommon::fileembstyle($fext); |
push @trimlist,$line if (defined($embstyle) && |
push @trimlist,$line if (defined($embstyle) && |
$embstyle ne 'hdn' ); |
($embstyle ne 'hdn' or $fext eq 'meta')); |
} else { |
} else { |
push @trimlist,$line; |
push @trimlist,$line; |
} |
} |
Line 600 sub display_line {
|
Line 602 sub display_line {
|
$title = &Apache::lonnet::metadata($filelink,'title') |
$title = &Apache::lonnet::metadata($filelink,'title') |
if ($metafile == 1); |
if ($metafile == 1); |
$title=$listname unless $title; |
$title=$listname unless $title; |
$r->print("<a href='javascript:select_data(\"", |
my $titleesc=$title; |
$title,'","',$filelink,"\")'>"); |
$titleesc=~s/\'/\\'/; |
|
$r->print("<a href=\"javascript:select_data('", |
|
$titleesc,"','",$filelink,"')\">"); |
$r->print("<img src='",$iconpath,"select.gif' border='0' /></a>". |
$r->print("<img src='",$iconpath,"select.gif' border='0' /></a>". |
"\n"); |
"\n"); |
$r->print("</td><td valign='bottom' nowrap bgcolor=$fileclr>"); |
$r->print("</td><td valign='bottom' nowrap bgcolor=$fileclr>"); |