[LON-CAPA-cvs] cvs: loncom(version_2_1_X) /interface lonparmset.pm
albertel
lon-capa-cvs@mail.lon-capa.org
Tue, 22 Nov 2005 19:02:41 -0000
albertel Tue Nov 22 14:02:41 2005 EDT
Modified files: (Branch: version_2_1_X)
/loncom/interface lonparmset.pm
Log:
- backport 1.270
Index: loncom/interface/lonparmset.pm
diff -u loncom/interface/lonparmset.pm:1.268 loncom/interface/lonparmset.pm:1.268.2.1
--- loncom/interface/lonparmset.pm:1.268 Mon Nov 21 17:00:11 2005
+++ loncom/interface/lonparmset.pm Tue Nov 22 14:02:40 2005
@@ -1,7 +1,7 @@
# The LearningOnline Network with CAPA
# Handler to set parameters for assessments
#
-# $Id: lonparmset.pm,v 1.268 2005/11/21 22:00:11 albertel Exp $
+# $Id: lonparmset.pm,v 1.268.2.1 2005/11/22 19:02:40 albertel Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -529,10 +529,10 @@
my ($parmname)=((split(/\&/,$marker))[1]=~/\_([^\_]+)$/);
my ($hour,$min,$sec,$val)=&preset_defaults($parmname);
unless (defined($winvalue)) { $winvalue=$val; }
- return
+ return '<table width="100%"><tr valign="top" align="right"><td><a name="'.$marker.'" /></td></tr><tr><td align="center">'.
'<a href="javascript:pjump('."'".$type."','".$dis."','".$winvalue."','"
.$marker."','".$return."','".$call."','".$hour."','".$min."','".$sec."'".');">'.
- &valout($value,$type).'</a><a name="'.$marker.'"></a>';
+ &valout($value,$type).'</a></td></tr></table>';
}
sub startpage {