--- loncom/interface/lonhelper.pm 2010/05/24 09:21:18 1.180 +++ loncom/interface/lonhelper.pm 2010/09/02 00:19:17 1.180.2.2 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # .helper XML handler to implement the LON-CAPA helper # -# $Id: lonhelper.pm,v 1.180 2010/05/24 09:21:18 foxr Exp $ +# $Id: lonhelper.pm,v 1.180.2.2 2010/09/02 00:19:17 raeburn Exp $ # # Copyright Michigan State University Board of Trustees # @@ -571,7 +571,7 @@ sub process { # 4: Render the current state to the screen as an HTML page. sub display { my $self = shift; - + my $footer = shift; my $state = $self->{STATES}{$self->{STATE}}; my $result = ""; @@ -606,7 +606,7 @@ sub display { # FIXME: This should be parameterized, not concatenated - Jeremy - if (!$state->overrideForm()) { $result.='
'; } + if (!$state->overrideForm()) { $result.=''; } if ($stateHelp) { $stateHelp = &Apache::loncommon::help_open_topic($stateHelp); } @@ -661,7 +661,7 @@ sub display {
FOOTER - $result .= &Apache::loncommon::end_page(); + $result .= $footer.&Apache::loncommon::end_page(); # Handle writing out the vars to the file my $file = Apache::File->new('>'.$self->{FILENAME}); print $file $self->_varsInFile(); @@ -3679,8 +3679,10 @@ sub render { } my $previous = HTML::Entities::encode(&mt("Back"), '<>&"'); my $next = HTML::Entities::encode(&mt("Next"), '<>&"'); + my $target = " target='loncapaclient'"; + if ($env{'environment.remote'} eq 'off') { $target=''; } $result .= "

\n" . - "

\n" . + "\n" . "" . "" . "\n" .