--- rat/lonratparms.pm	2008/11/11 16:40:38	1.25
+++ rat/lonratparms.pm	2009/04/23 17:26:27	1.28
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # Set parameters inside of the RAT
 #
-# $Id: lonratparms.pm,v 1.25 2008/11/11 16:40:38 jms Exp $
+# $Id: lonratparms.pm,v 1.28 2009/04/23 17:26:27 bisitz Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -26,34 +26,6 @@
 # http://www.lon-capa.org/
 #
 
-=head1 NAME
-
-Apache::lonratparams
-
-=head1 SYNOPSIS
-
-Handler to set resource parameters inside of
-the RAT based on metadata.
-
-This is part of the LearningOnline Network with CAPA project
-described at http://www.lon-capa.org.
-
-=head1 HANDLER SUBROUTINE
-
-handler()
-
-=head1 OTHER SUBROUTINES
-
-=over
-
-=item *
-
-none
-
-=back
-
-=cut
-
 package Apache::lonratparms;
 
 use strict;
@@ -108,7 +80,7 @@ sub handler {
     my %lt=&Apache::lonlocal::texthash('pa' => 'Parameter',
 			               'de' => 'Default',
 				       'va' => 'Value',
-				       'se' => 'Set');
+				       'se' => 'Set?');
     my $js = (<<ENDHEADER);
 <script type="text/javascript">
 
@@ -148,11 +120,11 @@ ENDHEADER
     $r->print(<<ENDDOCUMENT);
 $start_page
 <form action="javascript:setparms();" method="post" name="parameters">
-<input type="hidden" value='' name="pres_value">
-<input type="hidden" value='' name="pres_type">
-<input type="hidden" value='' name="pres_marker">
-<table border=2>
-<tr><th>$lt{'pa'}</th><th>$lt{'de'}</th><th>$lt{'va'}</th><th>$lt{'se'}?</th></tr>
+<input type="hidden" value="" name="pres_value" />
+<input type="hidden" value="" name="pres_type" />
+<input type="hidden" value="" name="pres_marker" />
+<table border="2">
+<tr><th>$lt{'pa'}</th><th>$lt{'de'}</th><th>$lt{'va'}</th><th>$lt{'se'}</th></tr>
 ENDDOCUMENT
 
 ###    %display=&Apache::lonlocal::texthash(%display);
@@ -162,17 +134,17 @@ ENDDOCUMENT
         # Should if(defined($value{$key})) be if(exists($value{$key})) ?
         if (defined($value{$key})) { $cur=$value{$key}; };
         $r->print(<<"END");
-<tr><td><b>$display{$key}</b><br><tt>$key</tt></td>
+<tr><td><b>$display{$key}</b><br /><tt>$key</tt></td>
 <td>&nbsp;$content{$key}</td>
-<td><input type="text" size="10" name="$key" value="$cur">&nbsp;
+<td><input type="text" size="10" name="$key" value="$cur" />&nbsp;
 <a href='javascript:pjump("$type{$key}","$display{$key}",document.parameters.$key.value,"$key","parameters.pres","stpr");'>$enter</a></td>
 <td><input type="checkbox" name="def_$key" 
 END
-        if ($value{$key}) { $r->print(' checked'); }
-        $r->print('></td></tr>');
+        if ($value{$key}) { $r->print(' checked="checked"'); }
+        $r->print(' /></td></tr>');
     }
     $r->print('</table><br />
-               <input type="submit" value="'.&mt('Set').'"></form>'.
+               <input type="submit" value="'.&mt('Set').'" /></form>'.
 	      &Apache::loncommon::end_page());
     return OK;
 } 
@@ -180,3 +152,33 @@ END
 1;
 __END__
 
+
+
+=head1 NAME
+
+Apache::lonratparams
+
+=head1 SYNOPSIS
+
+Handler to set resource parameters inside of
+the RAT based on metadata.
+
+This is part of the LearningOnline Network with CAPA project
+described at http://www.lon-capa.org.
+
+=head1 HANDLER SUBROUTINE
+
+handler()
+
+=head1 OTHER SUBROUTINES
+
+=over
+
+=item *
+
+none
+
+=back
+
+=cut
+