loncom/homework/optionresponse.pm - diff

Return to optionresponse.pm CVS log

Up to [LON-CAPA] / loncom / homework

Diff for /loncom/homework/optionresponse.pm between versions 1.59 and 1.61

version 1.59, 2002/11/10 15:51:31	version 1.61, 2002/11/11 20:13:47
Line 375 sub displayfoils {	Line 375 sub displayfoils {
}	}
$temp++;	$temp++;
} else {	} else {
	my $texoptionlist = &optionlist_correction($optionlist);
if ($displayoptionintex == 0) {	if ($displayoptionintex == 0) {
my $texoptionlist = &optionlist_correction($optionlist);	if ($Apache::lonhomework::type eq 'exam') {$texoptionlist='';} #if exam we do not need to show optionlist
if ($Apache::lonhomework::type eq 'exam') {$texoptionlist='';}
if ($Apache::response::foilgroup{$name.'.text'}=~m/\\item /) {	if ($Apache::response::foilgroup{$name.'.text'}=~m/\\item /) {
if ($Apache::lonhomework::type eq 'exam') {	if ($Apache::lonhomework::type eq 'exam') {
$Apache::response::foilgroup{$name.'.text'}=~s/\\item/\\item[\\textbf{$Apache::lonxml::counter}\.]/;	$Apache::response::foilgroup{$name.'.text'}=~s/\\item/\\item[\\textbf{$Apache::lonxml::counter}\.]/;
}	}
$result.= $texoptionlist.$Apache::response::foilgroup{$name.'.text'};	if ($Apache::response::foilgroup{$name.'.text'}=~/<drawoptionlist\s*\/>/) {
	$Apache::response::foilgroup{$name.'.text'}=~s\|<drawoptionlist\s*/>\| \\makebox\[0\.3in\]\[b\]\{\\hrulefill\} \|;
	$result.= $texoptionlist.$Apache::response::foilgroup{$name.'.text'};
	}
} else {	} else {
if ($Apache::lonhomework::type eq 'exam') {	if ($Apache::lonhomework::type eq 'exam') {
$result.= $texoptionlist.'\vspace*{-2 mm}\item[\textbf{'.$Apache::lonxml::counter.'}.]'.$Apache::response::foilgroup{$name.'.text'};	$result.= $texoptionlist.'\vspace*{-2 mm}\item[\textbf{'.$Apache::lonxml::counter.'}.]'.$Apache::response::foilgroup{$name.'.text'};
Line 399 sub displayfoils {	Line 402 sub displayfoils {
if ($Apache::lonhomework::type eq 'exam') {	if ($Apache::lonhomework::type eq 'exam') {
$Apache::response::foilgroup{$name.'.text'}=~s/\\item/\\item[\\textbf{$Apache::lonxml::counter}\.]/;	$Apache::response::foilgroup{$name.'.text'}=~s/\\item/\\item[\\textbf{$Apache::lonxml::counter}\.]/;
}	}
$result.= $Apache::response::foilgroup{$name.'.text'};	if ($Apache::response::foilgroup{$name.'.text'}=~/<drawoptionlist\s*\/>/) {
	$Apache::response::foilgroup{$name.'.text'}=~s\|<drawoptionlist\s*/>\| \\makebox\[0\.3in\]\[b\]\{\\hrulefill\} \|;
	}
	$result.= $Apache::response::foilgroup{$name.'.text'};
} else {	} else {
if ($Apache::lonhomework::type eq 'exam') {	if ($Apache::lonhomework::type eq 'exam') {
$result.= '\item[\textbf{'.$Apache::lonxml::counter.'}.]'.$Apache::response::foilgroup{$name.'.text'};	$result.= '\item[\textbf{'.$Apache::lonxml::counter.'}.]'.$Apache::response::foilgroup{$name.'.text'};

FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>

Removed from v.1.59
changed lines
	Added in v.1.61