[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 {