--- loncom/interface/Attic/lonwizard.pm	2003/02/28 23:42:18	1.15
+++ loncom/interface/Attic/lonwizard.pm	2003/03/01 00:07:18	1.17
@@ -270,7 +270,7 @@ HEADER
         if ($self->{STATE} ne $self->{START_STATE}) {
             #$result .= '<input name="SUBMIT" type="submit" value="&lt;- Previous" />&nbsp;&nbsp;';
         }
-        if ($self->{DONE} {
+        if ($self->{DONE}) {
             my $returnPage = $self->{RETURN_PAGE};
             $result .= "<a href=\"$returnPage\">End Wizard</a>";
         }
@@ -806,7 +806,7 @@ sub render {
 	$result .= "<tr>\n<td width='20'>&nbsp;</td>\n<td>";
 	$result .= "<td valign=\"top\"><input type=\"radio\" name=\"$var.forminput\"";
         if (!$checked) {
-            $result .= " selected";
+            $result .= " checked";
             $checked = 1;
         }
 	$result .= " value=\"$value\"></td>\n<td>$text</td>\n</tr>\n\n";
@@ -1266,6 +1266,7 @@ sub render {
     # Create the composite function that renders the column on the nav map
     # have to admit any language that lets me do this can't be all bad
     #  - Jeremy (Pythonista) ;-)
+    my $checked = 0;
     my $renderColFunc = sub {
         my ($resource, $part, $params) = @_;
         
@@ -1273,8 +1274,9 @@ sub render {
             return '<td>&nbsp;</td>';
         } else {
             my $col = "<td><input type='radio' name='${var}.forminput' ";
-            if ($vals->{$resource->{ID}}) {
+            if (!$checked) {
                 $col .= "checked ";
+                $checked = 1;
             }
             $col .= "value='" . $resource->{ID} . "' /></td>";
             return $col;