|
version 1.52, 2004/03/15 22:09:52
|
version 1.55, 2004/08/12 06:00:39
|
|
Line 75 sub end_imageresponse {
|
Line 75 sub end_imageresponse {
|
| sub start_foilgroup { |
sub start_foilgroup { |
| %Apache::response::foilgroup=(); |
%Apache::response::foilgroup=(); |
| $Apache::imageresponse::conceptgroup=0; |
$Apache::imageresponse::conceptgroup=0; |
| &Apache::response::setrandomnumber(); |
&Apache::response::pushrandomnumber(); |
| return ''; |
return ''; |
| } |
} |
| |
|
|
Line 296 sub end_foilgroup {
|
Line 296 sub end_foilgroup {
|
| } elsif ($target eq 'edit') { |
} elsif ($target eq 'edit') { |
| $result=&Apache::edit::end_table(); |
$result=&Apache::edit::end_table(); |
| } |
} |
| |
&Apache::response::poprandomnumber(); |
| return $result; |
return $result; |
| } |
} |
| |
|
|
Line 499 sub end_image {
|
Line 500 sub end_image {
|
| } elsif ($width ne '') { |
} elsif ($width ne '') { |
| $width_param = $width*$scaling; |
$width_param = $width*$scaling; |
| } |
} |
| |
$width_param=&Apache::randomlabel::adjust_textwidth($width_param); |
| #where can we find the picture? |
#where can we find the picture? |
| if (-e $newsrc) { |
if (-e $newsrc) { |
| if ($path) { |
if ($path) { |
|
Line 551 sub end_rectangle {
|
Line 553 sub end_rectangle {
|
| $target eq 'analyze') { |
$target eq 'analyze') { |
| my $name = $Apache::imageresponse::curname; |
my $name = $Apache::imageresponse::curname; |
| my $area = &Apache::lonxml::endredirection; |
my $area = &Apache::lonxml::endredirection; |
| |
$area=~s/\s//g; |
| &Apache::lonxml::debug("out is $area for $name"); |
&Apache::lonxml::debug("out is $area for $name"); |
| if ( $Apache::imageresponse::conceptgroup |
if ( $Apache::imageresponse::conceptgroup |
| && !&Apache::response::showallfoils()) { |
&& !&Apache::response::showallfoils()) { |
![[BACK]](/icons/back.gif){kind=icon}
Return to imageresponse.pm CVS log ![[TXT]](/icons/text.gif){kind=icon}
![[DIR]](/icons/dir.gif){kind=icon}
Up to [LON-CAPA] / loncom / homework