![[BACK]](/icons/back.gif){kind=icon}
Return to default_homework.lcpm CVS log ![[TXT]](/icons/text.gif){kind=icon}
![[DIR]](/icons/dir.gif){kind=icon}
Up to [LON-CAPA] / loncom / homework|
Return to default_homework.lcpm CVS log | Up to [LON-CAPA] / loncom / homework |
| version 1.169, 2014/06/25 16:50:51 | version 1.170, 2014/12/14 02:43:59 |
|---|---|
| Line 1228 sub sec { | Line 1228 sub sec { |
| } | } |
| sub submission { | sub submission { |
| my ($partid,$responseid,$subnumber,$encode,$cleanupnum)=@_; | my ($partid,$responseid,$subnumber,$encode,$cleanupnum,$mapalias)=@_; |
| my $sub=''; | my $sub=''; |
| if ($subnumber) { $sub=$subnumber.':'; } | if ($subnumber) { $sub=$subnumber.':'; } |
| my $output = | my $output = |
| &EXT('user.resource.'.$sub.'resource.'.$partid.'.'.$responseid.'.submission'); | &EXT('user.resource.'.$sub.'resource.'.$partid.'.'.$responseid.'.submission',$mapalias); |
| if (ref($output) eq 'ARRAY') { | if (ref($output) eq 'ARRAY') { |
| my @items = @{$output}; | my @items = @{$output}; |
| if ($encode) { | if ($encode) { |