--- loncom/interface/loncommon.pm 2006/11/29 15:38:22 1.475 +++ loncom/interface/loncommon.pm 2006/11/29 19:33:29 1.476 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # a pile of common routines # -# $Id: loncommon.pm,v 1.475 2006/11/29 15:38:22 www Exp $ +# $Id: loncommon.pm,v 1.476 2006/11/29 19:33:29 raeburn Exp $ # # Copyright Michigan State University Board of Trustees # @@ -2896,7 +2896,6 @@ sub parse_block_record { ($setuname,$setudom) = split(/:/,$record->{'setter'}); $title = &unescape($record->{'event'}); $blocks = $record->{'blocks'}; - } else { my @data = split(/:/,$record,3); if (scalar(@data) eq 2) { @@ -2919,7 +2918,7 @@ sub build_block_table { 'blse' => 'Block set by' ); my $output; - $output = '

'.$lt{'cacb'}.':

'; + $output = '
'.$lt{'cacb'}.':
'; $output .= &start_data_table(); $output .= ' @@ -2932,15 +2931,14 @@ sub build_block_table { my %courseinfo=&Apache::lonnet::coursedescription($course); for (my $i=0; $i<@{$$setters{$course}{staff}}; $i++) { my ($uname,$udom) = @{$$setters{$course}{staff}[$i]}; - my $fullname = &Apache::loncommon::plainname($uname,$udom); + my $fullname = &aboutmewrapper(&plainname($uname,$udom),$uname,$udom); my ($openblock,$closeblock) = @{$$setters{$course}{times}[$i]}; $openblock = &Apache::lonlocal::locallocaltime($openblock); $closeblock= &Apache::lonlocal::locallocaltime($closeblock); $output .= &Apache::loncommon::start_data_table_row(). ''.$courseinfo{'description'}.''. ''.$openblock.' to '.$closeblock.''. - ''.$fullname.' ('.$uname.':'.$udom. - ')'. + ''.$fullname.'.'. &Apache::loncommon::end_data_table_row(); } }