--- loncom/interface/lonhtmlcommon.pm 2009/08/13 16:19:13 1.182.4.6 +++ loncom/interface/lonhtmlcommon.pm 2009/08/23 12:59:18 1.182.4.8 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # a pile of common html routines # -# $Id: lonhtmlcommon.pm,v 1.182.4.6 2009/08/13 16:19:13 raeburn Exp $ +# $Id: lonhtmlcommon.pm,v 1.182.4.8 2009/08/23 12:59:18 raeburn Exp $ # # Copyright Michigan State University Board of Trustees # @@ -990,9 +990,9 @@ sub Create_PrgWin { &mt('Starting').'" /><\\/form>'.$end_page. "\');". "popwin.document.close();}". - "\nwindow.setTimeout(openpopwin,0)."\n". + "\nwindow.setTimeout(openpopwin,0)\n". '// ]]>'."\n". - '"); + ''); $prog_state{'formname'}='popremain'; $prog_state{'inputname'}="remaining"; } elsif ($type eq 'inline') { @@ -1813,7 +1813,7 @@ sub topic_bar { return '
'.&mt('Step [_1]',$imgnum).
-              ' '.$title + '" src="/res/adm/pages/bl_step'.$imgnum.'.gif" /> '.$title.'
'; } @@ -1950,7 +1950,7 @@ sub set_form_elements { $values{$name}[$i] =~ s/([\r\n\f]+)/\\n/g; $values{$name}[$i] =~ s/"/\\"/g; } - if ($$elements{$name} eq 'text') { + if (($$elements{$name} eq 'text') || ($$elements{$name} eq 'hidden')) { my $numvalues = @{$values{$name}}; if ($numvalues > 1) { my $valuestring = join('","',@{$values{$name}}); @@ -1985,6 +1985,8 @@ sub set_form_elements { $output .= qq| if (courseForm.elements['$name'].value == "$value") { courseForm.elements['$name'].checked = true; + } else { + courseForm.elements['$name'].checked = false; }|; } }