--- loncom/homework/matchresponse.pm 2008/10/24 16:22:54 1.72
+++ loncom/homework/matchresponse.pm 2008/12/11 00:56:20 1.73
@@ -1,7 +1,7 @@
# The LearningOnline Network with CAPA
# Full matching style response
#
-# $Id: matchresponse.pm,v 1.72 2008/10/24 16:22:54 bisitz Exp $
+# $Id: matchresponse.pm,v 1.73 2008/12/11 00:56:20 raeburn Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -54,11 +54,11 @@ sub start_matchresponse {
$result=&Apache::response::meta_package_write('matchresponse');
} elsif ($target eq 'edit' ) {
$result.=&Apache::edit::start_table($token).
- '
'.&Apache::lonxml::description($token).' | '
.''.&mt('Delete?').' '
.&Apache::edit::deletelist($target,$token)
.' | '
- ." ".&Apache::edit::end_row()
+ .' | '.&Apache::edit::end_row()
.&Apache::edit::start_spanning_row();
$result.=
@@ -103,12 +103,12 @@ sub start_itemgroup {
if ($target eq 'edit') {
$result=&Apache::edit::tag_start($target,$token);
$result.=&Apache::edit::select_arg('Randomize Order:','randomize',
- ['yes','no'],$token);
+ ['yes','no'],$token).' 'x 3;
$result.=&Apache::edit::select_arg('Items Display Location:',
'location',
['top','bottom','left','right'],
- $token);
- $result.=&Apache::edit::select_arg('Items Display Directection:',
+ $token).' 'x 3;
+ $result.=&Apache::edit::select_arg('Items Display Direction:',
'direction',
['vertical','horizontal'],
$token);
@@ -198,7 +198,8 @@ sub start_item {
$result=&Apache::edit::tag_start($target,$token,"Item");
$result.=&Apache::edit::text_arg('Name:','name',$token);
if ($randomize ne 'no') {
- $result.=&Apache::edit::select_arg('Location:','location',
+ $result.=' 'x 3 .
+ &Apache::edit::select_arg('Location:','location',
['random','top','bottom'],
$token);
}
@@ -254,11 +255,11 @@ sub start_foilgroup {
&Apache::response::pushrandomnumber();
if ($target eq 'edit') {
$result.=&Apache::edit::start_table($token)
- ." |
'.&mt('Collection Of Foils').' | '
.''.&mt('Delete?')
.&Apache::edit::deletelist($target,$token)
.' | '
- ." ".&Apache::edit::end_row()
+ .' | '.&Apache::edit::end_row()
.&Apache::edit::start_spanning_row()."\n";
}
return $result;
|