version 1.176, 2007/08/17 18:14:37
|
version 1.181.4.2, 2009/08/13 12:46:29
|
Line 407 function gothere(val) {
|
Line 407 function gothere(val) {
|
ENDHEADER |
ENDHEADER |
|
|
my ($headerdom)=($uri=~m{^/res/($match_domain)/}); |
my ($headerdom)=($uri=~m{^/res/($match_domain)/}); |
$r->print(&Apache::loncommon::start_page('Browse Resources',$js, |
my %args = ( |
{'domain' => $headerdom,})); |
'domain' => $headerdom, |
|
); |
|
if ($env{'form.catalogmode'}) { |
|
# "Popup mode" |
|
$args{'only_body'} = 1; |
|
} |
|
$r->print(&Apache::loncommon::start_page('Browse Resources',$js,\%args)); |
# ---------------------------------- get state of file types to be showing |
# ---------------------------------- get state of file types to be showing |
if ($env{'form.only'}) { |
if ($env{'form.only'}) { |
$typeselect = $env{'form.only'}; |
$typeselect = $env{'form.only'}; |
Line 418 ENDHEADER
|
Line 424 ENDHEADER
|
|
|
# ---------------------------------- get state of file attributes to be showing |
# ---------------------------------- get state of file attributes to be showing |
if ($env{'form.attrs'}) { |
if ($env{'form.attrs'}) { |
for (my $i=0; $i<=11; $i++) { |
for (my $i=0; $i<=16; $i++) { |
delete $hash{'display_attrs_'.$i}; |
delete $hash{'display_attrs_'.$i}; |
if ($env{'form.attr'.$i} == 1) { |
if ($env{'form.attr'.$i} == 1) { |
$attrchk[$i] = 'checked'; |
$attrchk[$i] = 'checked'; |
Line 426 ENDHEADER
|
Line 432 ENDHEADER
|
} |
} |
} |
} |
} else { |
} else { |
for (my $i=0; $i<=11; $i++) { |
for (my $i=0; $i<=16; $i++) { |
$attrchk[$i] = 'checked' if $hash{'display_attrs_'.$i} == 1; |
$attrchk[$i] = 'checked' if $hash{'display_attrs_'.$i} == 1; |
} |
} |
} |
} |
Line 442 ENDHEADER
|
Line 448 ENDHEADER
|
'st' => 'Statistics', |
'st' => 'Statistics', |
'au' => 'Author', |
'au' => 'Author', |
'kw' => 'Keywords', |
'kw' => 'Keywords', |
|
'sb' => 'Subject', |
|
'nt' => 'Notes', |
|
'ab' => 'Abstract', |
'ln' => 'Language', |
'ln' => 'Language', |
|
'gl' => 'Grade Level', |
|
'sd' => 'Standards', |
'sa' => 'Source Available', |
'sa' => 'Source Available', |
'sr' => 'Show resource', |
'sr' => 'Show resource', |
'li' => 'Linked/Related Resources', |
'li' => 'Linked/Related Resources', |
Line 450 ENDHEADER
|
Line 461 ENDHEADER
|
'ud' => 'Update Display', |
'ud' => 'Update Display', |
'pr' => 'Problems', |
'pr' => 'Problems', |
'gr' => 'Graphics', |
'gr' => 'Graphics', |
'at' => 'All types' |
'at' => 'All types', |
|
'hd' => 'Display Options', |
); |
); |
$r->print(<<END); |
$r->print(<<END); |
|
<fieldset> |
|
<legend>$lt{'hd'}</legend> |
<form method="post" name="fileattr" action="$uri" |
<form method="post" name="fileattr" action="$uri" |
enctype="application/x-www-form-urlencoded"> |
enctype="application/x-www-form-urlencoded"> |
<label><input type="checkbox" name="attr9" value="1" $attrchk[9] onClick="this.form.submit();" /> $lt{'av'}</label> |
<label><input type="checkbox" name="attr9" value="1" $attrchk[9] onClick="this.form.submit();" /> $lt{'av'}</label> |
Line 462 ENDHEADER
|
Line 476 ENDHEADER
|
<td><label><input type="checkbox" name="attr4" value="1" $attrchk[4] onClick="this.form.submit();" /> $lt{'au'}</label></td> |
<td><label><input type="checkbox" name="attr4" value="1" $attrchk[4] onClick="this.form.submit();" /> $lt{'au'}</label></td> |
<td><label><input type="checkbox" name="attr5" value="1" $attrchk[5] onClick="this.form.submit();" /> $lt{'kw'}</label></td> |
<td><label><input type="checkbox" name="attr5" value="1" $attrchk[5] onClick="this.form.submit();" /> $lt{'kw'}</label></td> |
<td><label><input type="checkbox" name="attr6" value="1" $attrchk[6] onClick="this.form.submit();" /> $lt{'ln'}</label></td> |
<td><label><input type="checkbox" name="attr6" value="1" $attrchk[6] onClick="this.form.submit();" /> $lt{'ln'}</label></td> |
|
<td><label><input type="checkbox" name="attr13" value="1" $attrchk[13] onClick="this.form.submit();" /> $lt{'nt'}</label></td> |
|
<td><label><input type="checkbox" name="attr16" value="1" $attrchk[16] onClick="this.form.submit();" /> $lt{'sd'}</label></td> |
</tr> |
</tr> |
<tr> |
<tr> |
<td><label><input type="checkbox" name="attr1" value="1" $attrchk[1] onClick="this.form.submit();" /> $lt{'si'}</label></td> |
<td><label><input type="checkbox" name="attr1" value="1" $attrchk[1] onClick="this.form.submit();" /> $lt{'si'}</label></td> |
<td><label><input type="checkbox" name="attr2" value="1" $attrchk[2] onClick="this.form.submit();" /> $lt{'la'}</label></td> |
<td><label><input type="checkbox" name="attr2" value="1" $attrchk[2] onClick="this.form.submit();" /> $lt{'la'}</label></td> |
<td><label><input type="checkbox" name="attr3" value="1" $attrchk[3] onClick="this.form.submit();" /> $lt{'lm'}</label></td> |
<td><label><input type="checkbox" name="attr3" value="1" $attrchk[3] onClick="this.form.submit();" /> $lt{'lm'}</label></td> |
<td><label><input type="checkbox" name="attr10" value="1" $attrchk[10] onClick="this.form.submit();" /> $lt{'sa'}</label></td> |
<td><label><input type="checkbox" name="attr10" value="1" $attrchk[10] onClick="this.form.submit();" /> $lt{'sa'}</label></td> |
|
<td><label><input type="checkbox" name="attr14" value="1" $attrchk[14] onClick="this.form.submit();" /> $lt{'ab'}</label></td> |
|
<td> </td> |
</tr> |
</tr> |
<tr> |
<tr> |
<td><label><input type="checkbox" name="attr8" value="1" $attrchk[8] onClick="this.form.submit();" /> $lt{'st'}</label></td> |
<td><label><input type="checkbox" name="attr8" value="1" $attrchk[8] onClick="this.form.submit();" /> $lt{'st'}</label></td> |
<td><label><input type="checkbox" name="attr11" value="1" $attrchk[11] onClick="this.form.submit();" /> $lt{'li'}</label></td> |
<td><label><input type="checkbox" name="attr11" value="1" $attrchk[11] onClick="this.form.submit();" /> $lt{'li'}</label></td> |
<td><label><input type="checkbox" name="attr7" value="1" $attrchk[7] onClick="this.form.submit();" /> $lt{'sr'}</label></td> |
<td><label><input type="checkbox" name="attr7" value="1" $attrchk[7] onClick="this.form.submit();" /> $lt{'sr'}</label></td> |
|
<td><label><input type="checkbox" name="attr12" value="1" $attrchk[12] onClick="this.form.submit();" /> $lt{'sb'}</label></td> |
|
<td><label><input type="checkbox" name="attr15" value="1" $attrchk[15] onClick="this.form.submit();" /> $lt{'gl'}</label></td> |
<td> </td> |
<td> </td> |
</tr> |
</tr> |
</table> |
</table> |
<input type="hidden" name="attrs" value="1" /> |
<input type="hidden" name="attrs" value="1" /> |
<label> |
|
END |
END |
$r->print(&Apache::loncommon::filecategoryselect('only',$typeselect)); |
my @file_categories = &Apache::loncommon::filecategories(); |
$r->print(<<END); |
my %select_file_categories; |
File Type Displayed</label> |
my @select_form_order = (''); |
|
$select_file_categories{''} = &mt('All file types'); |
|
foreach my $cat (@file_categories) { |
|
my $types = join(",",&Apache::loncommon::filecategorytypes($cat)); |
|
$select_file_categories{$types} = $cat; |
|
push(@select_form_order,$types); |
|
} |
|
$select_file_categories{'select_form_order'} = \@select_form_order; |
|
my $type_element= |
|
&Apache::loncommon::select_form($typeselect,'only', |
|
%select_file_categories); |
|
$type_element = '<label>'.&mt('File Type Displayed: [_1]', |
|
$type_element).'</label>'; |
|
$r->print($type_element |
|
.'</fieldset>'); |
|
$r->print(<<END); |
<br /> |
<br /> |
<input type="submit" name="updatedisplay" value="$lt{'ud'}" /> |
<input type="submit" name="updatedisplay" value="$lt{'ud'}" /> |
<input type="hidden" name="acts" value="" /> |
<input type="hidden" name="acts" value="" /> |
$closebutton $groupimportbutton |
$closebutton $groupimportbutton |
END |
END |
$r->print(&Apache::loncommon::inhibit_menu_check('input')); |
$r->print(&Apache::loncommon::inhibit_menu_check('input')); |
|
|
# -------------- Filter out sequence containment in crumbs and "recent folders" |
# -------------- Filter out sequence containment in crumbs and "recent folders" |
my $storeuri=$uri; |
my $storeuri=$uri; |
$storeuri='/'.(split(/\.(page|sequence)\/\//,$uri))[-1]; |
$storeuri='/'.(split(/\.(page|sequence)\/\//,$uri))[-1]; |
Line 549 END
|
Line 584 END
|
if ($hash{'display_attrs_11'} == 1); |
if ($hash{'display_attrs_11'} == 1); |
$r->print("<td><b>".&mt("Resource")."</b></td>\n") |
$r->print("<td><b>".&mt("Resource")."</b></td>\n") |
if ($hash{'display_attrs_7'} == 1); |
if ($hash{'display_attrs_7'} == 1); |
|
$r->print("<th>".&mt("Subject")."</th>\n") |
|
if ($hash{'display_attrs_12'} == 1); |
|
$r->print("<th>".&mt("Notes")."</th>\n") |
|
if ($hash{'display_attrs_13'} == 1); |
|
$r->print("<th>".&mt("Abstract")."</th>\n") |
|
if ($hash{'display_attrs_14'} == 1); |
|
$r->print("<th>".&mt("Grade Level")."</th>\n") |
|
if ($hash{'display_attrs_15'} == 1); |
|
$r->print("<th>".&mt("Standards")."</th>\n") |
|
if ($hash{'display_attrs_16'} == 1); |
$r->print('</tr>'); |
$r->print('</tr>'); |
|
|
# ----------------- read in what directories have previously been set to "open" |
# ----------------- read in what directories have previously been set to "open" |
Line 643 sub scanDir {
|
Line 688 sub scanDir {
|
next if($strip =~ /.*\.meta$/ | $obs eq '1'); |
next if($strip =~ /.*\.meta$/ | $obs eq '1'); |
my (@fileparts) = split(/\./,$strip); |
my (@fileparts) = split(/\./,$strip); |
if ($hash{'display_attrs_9'} != 1) { |
if ($hash{'display_attrs_9'} != 1) { |
# if not all versions to be shown |
# if not all versions to be shown |
if (scalar(@fileparts) >= 3) { |
if (scalar(@fileparts) >= 3) { |
my $fext = pop @fileparts; |
my $fext = pop @fileparts; |
my $ov = pop @fileparts; |
my $ov = pop @fileparts; |
Line 816 sub display_line {
|
Line 861 sub display_line {
|
|
|
my $tabtag='</td>'; |
my $tabtag='</td>'; |
my $i=0; |
my $i=0; |
while ($i<=11) { |
while ($i<=16) { |
$tabtag=join('',$tabtag,"<td> </td>") |
$tabtag=join('',$tabtag,"<td> </td>") |
if ($i != 9 && |
if ($i != 9 && |
$hash{'display_attrs_'.$i} == 1); |
$hash{'display_attrs_'.$i} == 1); |
Line 840 sub display_line {
|
Line 885 sub display_line {
|
'enctype="application/x-www-form-urlencoded"'. |
'enctype="application/x-www-form-urlencoded"'. |
'>'."\n"); |
'>'."\n"); |
$r->print(&Apache::loncommon::inhibit_menu_check('input')); |
$r->print(&Apache::loncommon::inhibit_menu_check('input')); |
$r->print ('<input type=hidden name=openuri value="'. |
$r->print ('<input type="hidden" name="openuri" value="'. |
$startdir.'" />'."\n"); |
$startdir.'" />'."\n"); |
$r->print ('<input type="hidden" name="acts" value="" />'."\n"); |
$r->print ('<input type="hidden" name="acts" value="" />'."\n"); |
$r->print ('<input src="'.$iconpath.'arrow_up.gif"'); |
$r->print ('<input src="'.$iconpath.'arrow_up.gif"'); |
Line 921 sub display_line {
|
Line 966 sub display_line {
|
my @file_ext = split (/\./,$listname); |
my @file_ext = split (/\./,$listname); |
my $curfext = $file_ext[-1]; |
my $curfext = $file_ext[-1]; |
if (@Omit) { |
if (@Omit) { |
foreach (@Omit) { return OK if ($curfext eq $_); } |
foreach (@Omit) { return OK if (lc($curfext) eq $_); } |
} |
} |
if (@Only) { |
if (@Only) { |
my $skip = 1; |
my $skip = 1; |
foreach (@Only) { $skip = 0 if ($curfext eq $_); } |
foreach (@Only) { $skip = 0 if (lc($curfext) eq $_); } |
return OK if ($skip > 0); |
return OK if ($skip > 0); |
} |
} |
# Set the icon for the file |
# Set the icon for the file |
my $iconname = &Apache::loncommon::icon($listname); |
my $iconname = &Apache::loncommon::icon($listname); |
$r->print("<tr valign='$valign' bgcolor=\"$fileclr\"><td nowrap='nowrap' valign='top'>"); |
$r->print('<tr valign="'.$valign.'" bgcolor="'.$fileclr.'">'. |
|
'<td valign="top"><span class="LC_nobreak">'); |
|
|
if ($env{'form.catalogmode'} eq 'interactive') { |
if ($env{'form.catalogmode'} eq 'interactive') { |
my $quotable_filelink = &Apache::loncommon::escape_single($filelink); |
my $quotable_filelink = &Apache::loncommon::escape_single($filelink); |
Line 938 sub display_line {
|
Line 984 sub display_line {
|
$quotable_filelink,"')\">"); |
$quotable_filelink,"')\">"); |
$r->print("<img alt=\"\" src='",$iconpath,"select.gif' class='LC_icon' /></a>". |
$r->print("<img alt=\"\" src='",$iconpath,"select.gif' class='LC_icon' /></a>". |
"\n"); |
"\n"); |
$r->print("</td><td nowrap='nowrap' valign='top'>"); |
$r->print('</span></td><td valign="top"><span class="LC_nobreak">'); |
} elsif ($env{'form.catalogmode'} eq 'import') { |
} elsif ($env{'form.catalogmode'} eq 'import') { |
$r->print("<form name='form$fnum' action=''>\n"); |
$r->print("<form name='form$fnum' action=''>\n"); |
$r->print("<input type='checkbox' name='filelink"."' ". |
$r->print("<input type='checkbox' name='filelink"."' ". |
Line 948 sub display_line {
|
Line 994 sub display_line {
|
$r->print("checked"); |
$r->print("checked"); |
} |
} |
$r->print(" />\n"); |
$r->print(" />\n"); |
$r->print("</form></td><td nowrap='nowrap' valign='top'>"); |
$r->print('</form></span></td><td valign="top"><span class="LC_nobreak">'); |
$hash{"pre_${fnum}_link"}=$filelink; |
$hash{"pre_${fnum}_link"}=$filelink; |
$hash{"pre_${fnum}_title"}=$title; |
$hash{"pre_${fnum}_title"}=$title; |
if (!$hash{"pre_${fnum}_title"}) { |
if (!$hash{"pre_${fnum}_title"}) { |
Line 963 sub display_line {
|
Line 1009 sub display_line {
|
$indent--; |
$indent--; |
} |
} |
# General indentation |
# General indentation |
if ($indent > 0 and $indent < 11) { |
if ($indent > 0 and $indent < 16) { |
$r->print("<img alt=\"\" src='",$iconpath,"whitespace",$indent, |
$r->print("<img alt=\"\" src='",$iconpath,"whitespace",$indent, |
".gif' class='LC_icon' />\n"); |
".gif' class='LC_icon' />\n"); |
} elsif ($indent >0) { |
} elsif ($indent >0) { |
Line 1000 sub display_line {
|
Line 1046 sub display_line {
|
&Apache::loncommon::inhibit_menu_check(\$quotable_filelink); |
&Apache::loncommon::inhibit_menu_check(\$quotable_filelink); |
$r->print (" (<a href=\"javascript:openWindow('".$quotable_filelink. |
$r->print (" (<a href=\"javascript:openWindow('".$quotable_filelink. |
"?inhibitmenu=yes','metadatafile','500','550','no','yes','no');\" ". |
"?inhibitmenu=yes','metadatafile','500','550','no','yes','no');\" ". |
" target=\"_self\">metadata</a>) "); |
" target=\"_self\">".&mt('metadata')."</a>) "); |
# Close form to open/close sequence |
# Close form to open/close sequence |
if ($filelink=~/\.(page|sequence)$/) { |
if ($filelink=~/\.(page|sequence)$/) { |
$r->print('</form>'); |
$r->print('</form>'); |
} |
} |
$r->print("</td>\n"); |
$r->print("</span></td>\n"); |
if ($hash{'display_attrs_0'} == 1) { |
if ($hash{'display_attrs_0'} == 1) { |
$r->print('<td> '.($title eq '' ? ' ' : $title). |
$r->print('<td> '.($title eq '' ? ' ' : $title). |
' </td>'."\n"); |
' </td>'."\n"); |
} |
} |
$r->print('<td align=right> ', |
$r->print('<td align="right"> ', |
$filecom[8]," </td>\n") |
$filecom[8]," </td>\n") |
if $hash{'display_attrs_1'} == 1; |
if $hash{'display_attrs_1'} == 1; |
$r->print('<td> '. |
$r->print('<td> '. |
(localtime($filecom[9]))." </td>\n") |
(&Apache::lonlocal::locallocaltime($filecom[9]))." </td>\n") |
if $hash{'display_attrs_2'} == 1; |
if $hash{'display_attrs_2'} == 1; |
$r->print('<td> '. |
$r->print('<td> '. |
(localtime($filecom[10]))." </td>\n") |
(&Apache::lonlocal::locallocaltime($filecom[10]))." </td>\n") |
if $hash{'display_attrs_3'} == 1; |
if $hash{'display_attrs_3'} == 1; |
|
|
if ($hash{'display_attrs_4'} == 1) { |
if ($hash{'display_attrs_4'} == 1) { |
Line 1043 sub display_line {
|
Line 1089 sub display_line {
|
# statistics |
# statistics |
&dynmetaread($filelink); |
&dynmetaread($filelink); |
$r->print("<td>"); |
$r->print("<td>"); |
&dynmetaprint($r,$filelink,'count'); |
for (qw(count course stdno avetries difficulty disc clear technical |
&dynmetaprint($r,$filelink,'course'); |
correct helpful depth)) { |
&dynmetaprint($r,$filelink,'stdno'); |
|
&dynmetaprint($r,$filelink,'avetries'); |
&dynmetaprint($r,$filelink,$_); |
&dynmetaprint($r,$filelink,'difficulty'); |
} |
&dynmetaprint($r,$filelink,'disc'); |
|
&dynmetaprint($r,$filelink,'clear'); |
|
&dynmetaprint($r,$filelink,'technical'); |
|
&dynmetaprint($r,$filelink,'correct'); |
|
&dynmetaprint($r,$filelink,'helpful'); |
|
&dynmetaprint($r,$filelink,'depth'); |
|
$r->print(" </td>\n"); |
$r->print(" </td>\n"); |
|
|
} |
} |
Line 1066 sub display_line {
|
Line 1106 sub display_line {
|
$r->print('<td>'."<a href=\"javascript:openWindow('" |
$r->print('<td>'."<a href=\"javascript:openWindow('" |
.$quotable_sourcelink. |
.$quotable_sourcelink. |
"', 'previewsource', '700', '700', 'no', 'yes','yes');\"". |
"', 'previewsource', '700', '700', 'no', 'yes','yes');\"". |
" target=\"_self\">Yes</a> "."</td>\n"); |
" target=\"_self\">".&mt('Source Code')."</a> "."</td>\n"); |
} else { #A cuddled else. :P |
} else { #A cuddled else. :P |
$r->print("<td> </td>\n"); |
$r->print("<td> </td>\n"); |
} |
} |
Line 1076 sub display_line {
|
Line 1116 sub display_line {
|
&dynmetaread($filelink); |
&dynmetaread($filelink); |
$r->print('<td>'); |
$r->print('<td>'); |
&coursecontext($r,$filelink); |
&coursecontext($r,$filelink); |
&dynmetaprint($r,$filelink,'goto_list'); |
for (qw(goto_list comefrom_list sequsage_list dependencies course_list)) { |
&dynmetaprint($r,$filelink,'comefrom_list'); |
&dynmetaprint($r,$filelink,$_); |
&dynmetaprint($r,$filelink,'sequsage_list'); |
} |
&dynmetaprint($r,$filelink,'dependencies'); |
$r->print('</td>'); |
&dynmetaprint($r,$filelink,'course_list'); |
|
$r->print('</td>'); |
|
} |
} |
if ($hash{'display_attrs_7'} == 1) { |
if ($hash{'display_attrs_7'} == 1) { |
# Show resource |
# Show resource |
Line 1089 sub display_line {
|
Line 1127 sub display_line {
|
$r->print('<td> '.($output eq '' ? ' ':$output). |
$r->print('<td> '.($output eq '' ? ' ':$output). |
" </td>\n"); |
" </td>\n"); |
} |
} |
|
if ($hash{'display_attrs_12'} == 1) { |
|
my $subject = &Apache::lonnet::metadata($filelink,'subject'); |
|
$r->print('<td> '.($subject eq '' ? ' ' : $subject). |
|
" </td>\n"); |
|
} |
|
|
|
if ($hash{'display_attrs_13'} == 1) { |
|
my $notes = &Apache::lonnet::metadata($filelink,'notes'); |
|
$r->print('<td> '.($notes eq '' ? ' ' : $notes). |
|
" </td>\n"); |
|
} |
|
|
|
if ($hash{'display_attrs_14'} == 1) { |
|
my $abstract = &Apache::lonnet::metadata($filelink,'abstract'); |
|
$r->print('<td> '.($abstract eq '' ? ' ' : $abstract). |
|
" </td>\n"); |
|
} |
|
|
|
if ($hash{'display_attrs_15'} == 1) { |
|
my $gradelevel = &Apache::lonnet::metadata($filelink,'gradelevel'); |
|
$r->print('<td> '.($gradelevel eq '' ? ' ' : $gradelevel). |
|
" </td>\n"); |
|
} |
|
|
|
if ($hash{'display_attrs_16'} == 1) { |
|
my $standards = &Apache::lonnet::metadata($filelink,'standards'); |
|
$r->print('<td> '.($standards eq '' ? ' ' : $standards). |
|
" </td>\n"); |
|
} |
|
|
$r->print("</tr>\n"); |
$r->print("</tr>\n"); |
} |
} |
|
|
Line 1100 sub display_line {
|
Line 1168 sub display_line {
|
$r->print("<tr bgcolor=\"$fileclr\">$extrafield<td valign=$valign>"); |
$r->print("<tr bgcolor=\"$fileclr\">$extrafield<td valign=$valign>"); |
&begin_form ($r,$curdir); |
&begin_form ($r,$curdir); |
my $indentm1 = $indent-1; |
my $indentm1 = $indent-1; |
if ($indentm1 < 11 and $indentm1 > 0) { |
if ($indentm1 < 16 and $indentm1 > 0) { |
$r->print("<img alt=\"\" src=",$iconpath,"whitespace",$indentm1, |
$r->print("<img alt=\"\" src=",$iconpath,"whitespace",$indentm1, |
".gif class='LC_icon' />\n"); |
".gif class='LC_icon' />\n"); |
} else { |
} else { |
Line 1139 sub display_line {
|
Line 1207 sub display_line {
|
$filecom[8]," </td>\n") |
$filecom[8]," </td>\n") |
if $hash{'display_attrs_1'} == 1; |
if $hash{'display_attrs_1'} == 1; |
$r->print('<td> '. |
$r->print('<td> '. |
(localtime($filecom[9]))." </td>\n") |
(&Apache::lonlocal::locallocaltime($filecom[9]))." </td>\n") |
if $hash{'display_attrs_2'} == 1; |
if $hash{'display_attrs_2'} == 1; |
$r->print('<td> '. |
$r->print('<td> '. |
(localtime($filecom[10]))." </td>\n") |
(&Apache::lonlocal::locallocaltime($filecom[10]))." </td>\n") |
if $hash{'display_attrs_3'} == 1; |
if $hash{'display_attrs_3'} == 1; |
|
|
if ($hash{'display_attrs_4'} == 1) { |
if ($hash{'display_attrs_4'} == 1) { |
Line 1168 sub display_line {
|
Line 1236 sub display_line {
|
if ($hash{'display_attrs_10'} == 1) { |
if ($hash{'display_attrs_10'} == 1) { |
$r->print('<td> </td>'); |
$r->print('<td> </td>'); |
} |
} |
if ($hash{'display_attrs_11'} == 1) { |
|
$r->print('<td> </td>'); |
|
} |
|
if ($hash{'display_attrs_7'} == 1) { |
if ($hash{'display_attrs_7'} == 1) { |
$r->print('<td> </td>'); |
$r->print('<td> </td>'); |
} |
} |
|
if ($hash{'display_attrs_12'} == 1) { |
|
my $subject = &Apache::lonnet::metadata($filelink,'subject'); |
|
$r->print('<td> '.($subject eq '' ? ' ' : $subject). |
|
" </td>\n"); |
|
} |
|
if ($hash{'display_attrs_11'} == 1) { |
|
$r->print('<td> </td>'); |
|
} |
|
if ($hash{'display_attrs_12'} == 1) { |
|
my $subject = &Apache::lonnet::metadata($filelink,'subject'); |
|
$r->print('<td> '.($subject eq '' ? ' ' : $subject). |
|
" </td>\n"); |
|
} |
|
if ($hash{'display_attrs_13'} == 1) { |
|
my $notes = &Apache::lonnet::metadata($filelink,'notes'); |
|
$r->print('<td> '.($notes eq '' ? ' ' : $notes). |
|
" </td>\n"); |
|
} |
|
if ($hash{'display_attrs_14'} == 1) { |
|
my $abstract = &Apache::lonnet::metadata($filelink,'abstract'); |
|
$r->print('<td> '.($abstract eq '' ? ' ' : $abstract). |
|
" </td>\n"); |
|
} |
|
if ($hash{'display_attrs_15'} == 1) { |
|
my $gradelevel = &Apache::lonnet::metadata($filelink,'gradelevel'); |
|
$r->print('<td> '.($gradelevel eq '' ? ' ' : $gradelevel). |
|
" </td>\n"); |
|
} |
|
if ($hash{'display_attrs_16'} == 1) { |
|
my $standards = &Apache::lonnet::metadata($filelink,'standards'); |
|
$r->print('<td> '.($standards eq '' ? ' ' : $standards). |
|
" </td>\n"); |
|
} |
$r->print('</tr>'); |
$r->print('</tr>'); |
} |
} |
|
|