--- loncom/interface/lonparmset.pm 2005/06/28 15:56:35 1.236 +++ loncom/interface/lonparmset.pm 2005/06/29 11:57:17 1.238 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # Handler to set parameters for assessments # -# $Id: lonparmset.pm,v 1.236 2005/06/28 15:56:35 albertel Exp $ +# $Id: lonparmset.pm,v 1.238 2005/06/29 11:57:17 www Exp $ # # Copyright Michigan State University Board of Trustees # @@ -1330,7 +1330,9 @@ sub assessparms { } else { my ($map,$id,$resource)=&Apache::lonnet::decode_symb($pssymb); $r->print(&mt('Specific Resource').": ".$resource. - '
'); + ''. + '

'); } &usermenu($r,$uname,$id,$udom,$csec); @@ -1475,12 +1477,7 @@ ENDTABLEHEADFOUR $r->print(''); - - $r->print(' / res / '); - $r->print(join(' / ', split(/\//,$mapp{$rid}))); - - $r->print(''); + '>'.$maptitles{$mapp{$rid}}.''); foreach (&keysinorder_bytype(\%name,\%keyorder)) { unless ($firstrow) { @@ -2180,6 +2177,11 @@ sub listdata { if ($sortorder eq 'realmstudent') { my ($astudent,$arealm)=($a=~/^$env{'request.course.id'}\.([^\.]+)\.(.+)\.[^\.]+$/); my ($bstudent,$brealm)=($b=~/^$env{'request.course.id'}\.([^\.]+)\.(.+)\.[^\.]+$/); + if (!defined($astudent) && !defined($bstudent) && + !defined($arealm) && !defined($brealm)) { + ($arealm)=($a=~/^$env{'request.course.id'}\.(.+)\.[^\.]+$/); + ($brealm)=($b=~/^$env{'request.course.id'}\.(.+)\.[^\.]+$/); + } ($arealm cmp $brealm) || ($astudent cmp $bstudent); } else { $a cmp $b;