loncom/interface/lonindexer.pm - diff

Return to lonindexer.pm CVS log

Up to [LON-CAPA] / loncom / interface

Diff for /loncom/interface/lonindexer.pm between versions 1.85 and 1.86

-version 1.85, 2004/01/02 21:00:56
+version 1.86, 2004/01/05 15:02:43
  Line 956  sub display_line {
  	$r->print ('<a href="javascript:gothere(\''.$curdir.'\')"><img src="'.
  		   $iconpath.'folder_'.$diropen.'.gif" border="0" /></a>'.
  		   "\n");
- 	$r->print ("$listname$tabtag</tr></form>\n");
+ 	$r->print ("$listname</td>\n");
+ # Attributes
+ 	my $filelink = $startdir.$filecom[0].'/default';
+ 	if ($hash{'display_attrs_0'} == 1) {
+ 	    my $title = &Apache::lonnet::gettitle($filelink,'title');
+ 	    $r->print('<td> '.($title eq '' ? '&nbsp;' : $title).
+ 		      ' </td>'."\n");
+ 	}
+ 	$r->print('<td align=right> ',
+ 		  $filecom[8]," </td>\n")
+ 	    if $hash{'display_attrs_1'} == 1;
+ 	$r->print('<td> '.
+ 		  (localtime($filecom[9]))." </td>\n")
+ 	    if $hash{'display_attrs_2'} == 1;
+ 	$r->print('<td> '.
+ 		  (localtime($filecom[10]))." </td>\n")
+ 	    if $hash{'display_attrs_3'} == 1;
+ 	if ($hash{'display_attrs_4'} == 1) {
+ 	    my $author = &Apache::lonnet::metadata($filelink,'author');
+ 	    $r->print('<td> '.($author eq '' ? '&nbsp;' : $author).
+ 		      " </td>\n");
+ 	}
+ 	if ($hash{'display_attrs_5'} == 1) {
+ 	    my $keywords = &Apache::lonnet::metadata($filelink,'keywords');
+ 	    # $keywords = '&nbsp;' if (!$keywords);
+ 	    $r->print('<td> '.($keywords eq '' ? '&nbsp;' : $keywords).
+ 		      " </td>\n");
+ 	}
+ 	if ($hash{'display_attrs_6'} == 1) {
+ 	    my $lang = &Apache::lonnet::metadata($filelink,'language');
+ 	    $lang = &Apache::loncommon::languagedescription($lang);
+ 	    $r->print('<td> '.($lang eq '' ? '&nbsp;' : $lang).
+ 		      " </td>\n");
+ 	}
+         if ($hash{'display_attrs_7'} == 1) {
+ 	   $r->print('<td>&nbsp;</td>');
+         }
+ 	if ($hash{'display_attrs_8'} == 1) {
+ 	   $r->print('<td>&nbsp;</td>');
+ 	}
+ 	$r->print('</form></tr>');
      }
  }

FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>

Removed from v.1.85
changed lines
	Added in v.1.86