Return to loncommon.pm CVS log | Up to [LON-CAPA] / loncom / interface |
version 1.379, 2006/06/05 22:05:09 | version 1.380, 2006/06/08 14:29:21 |
---|---|
Line 2899 ENDROLE | Line 2899 ENDROLE |
'.domain'}.'/'})) { | '.domain'}.'/'})) { |
my $cid = $env{'request.course.id'}; | my $cid = $env{'request.course.id'}; |
$dc_info.= $cid.' '.$env{'course.'.$cid.'.internal.coursecode'}; | $dc_info.= $cid.' '.$env{'course.'.$cid.'.internal.coursecode'}; |
$dc_info =~ s/\s+$//; | |
$dc_info = '('.$dc_info.')'; | $dc_info = '('.$dc_info.')'; |
} | } |