Return to loncreateuser.pm CVS log | Up to [LON-CAPA] / loncom / interface |
version 1.86, 2004/08/24 23:50:15 | version 1.87, 2004/09/23 22:51:24 |
---|---|
Line 413 END | Line 413 END |
$bgcol=substr($bgcol.$bgcol.$bgcol.'ffffff',2,6); | $bgcol=substr($bgcol.$bgcol.$bgcol.'ffffff',2,6); |
if ($area=~/^\/(\w+)\/(\d\w+)\/(\w+)/) { | if ($area=~/^\/(\w+)\/(\d\w+)\/(\w+)/) { |
$carea.='<br>Section/Group: '.$3; | $carea.='<br>Section/Group: '.$3; |
$sortkey.="\0$3"; | |
} | } |
$area=$carea; | $area=$carea; |
} else { | } else { |