version 1.22, 2001/08/06 20:33:23
|
version 1.23, 2001/08/13 21:44:24
|
Line 17 sub start_optionresponse {
|
Line 17 sub start_optionresponse {
|
push (@Apache::lonxml::namespace,'optionresponse'); |
push (@Apache::lonxml::namespace,'optionresponse'); |
my $id = &Apache::response::start_response($parstack,$safeeval); |
my $id = &Apache::response::start_response($parstack,$safeeval); |
if ($target eq 'edit') { |
if ($target eq 'edit') { |
$result.=&Apache::edit::start_table($token)."<tr><td>Multiple Option Response Question</td> |
$result.=&Apache::edit::start_table($token). |
<td>Delete:". |
"<tr><td>Multiple Option Response Question</td><td>Delete:". |
&Apache::edit::deletelist($target,$token) |
&Apache::edit::deletelist($target,$token) |
."</td><td> </td></tr><tr><td colspan=\"3\">\n"; |
."</td><td> </td></tr><tr><td colspan=\"3\">\n"; |
$result.=&Apache::edit::text_arg('Max Number Of Foils:','max',$token,'4')."</td></tr>"; |
$result.=&Apache::edit::text_arg('Max Number Of Foils:','max',$token,'4'). |
|
"</td></tr>"; |
$result.="<tr><td colspan=\"3\">\n"; |
$result.="<tr><td colspan=\"3\">\n"; |
} |
} |
if ($target eq 'modified') { |
if ($target eq 'modified') { |
my $constructtag=&Apache::edit::get_new_args($token,$parstack,$safeeval,'max'); |
my $constructtag=&Apache::edit::get_new_args($token,$parstack, |
|
$safeeval,'max'); |
if ($constructtag) { $result = &Apache::edit::rebuild_tag($token); } |
if ($constructtag) { $result = &Apache::edit::rebuild_tag($token); } |
} |
} |
|
if ($target eq 'meta') { |
|
$result=&Apache::response::meta_package_write('optionresponse'); |
|
} |
return $result; |
return $result; |
} |
} |
|
|