loncom/interface/portfolio.pm - diff

Return to portfolio.pm CVS log

Up to [LON-CAPA] / loncom / interface

version 1.142, 2006/08/02 03:05:10	version 1.143, 2006/08/02 16:56:30
Line 339 sub display_directory {	Line 339 sub display_directory {
foreach my $dir_line (@version_lines) {	foreach my $dir_line (@version_lines) {
my ($v_filename,$dom,$testdir,$size,$mtime,$obs) = @$dir_line;	my ($v_filename,$dom,$testdir,$size,$mtime,$obs) = @$dir_line;
my ($v_fname,$version,$v_extension) = &Apache::grades::file_name_version_ext($v_filename);	my ($v_fname,$version,$v_extension) = &Apache::grades::file_name_version_ext($v_filename);
	$line = '<td colspan="2"> </td>';
if (($v_fname eq $fname)&&($v_extension eq $extension)) {	if (($v_fname eq $fname)&&($v_extension eq $extension)) {
&display_directory_line($r,$select_mode,$fullpath, $v_filename, $mtime, $size,	&display_directory_line($r,$select_mode,$fullpath, $v_filename, $mtime, $size,
$css_class, $line, \%access_controls, $curr_access, $now,	$css_class, $line, \%access_controls, $curr_access, $now,