[LON-CAPA-cvs] cvs: loncom(version_2_10_X) /interface lonhelper.pm

[raeburn]

raeburn		Thu Sep  2 00:19:17 2010 EDT

  Modified files:              (Branch: version_2_10_X)
    /loncom/interface	lonhelper.pm 
  Log:
  - Backport 1.181.
  
  
Index: loncom/interface/lonhelper.pm
diff -u loncom/interface/lonhelper.pm:1.180.2.1 loncom/interface/lonhelper.pm:1.180.2.2
--- loncom/interface/lonhelper.pm:1.180.2.1	Sat Aug 14 20:19:42 2010
+++ loncom/interface/lonhelper.pm	Thu Sep  2 00:19:17 2010
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # .helper XML handler to implement the LON-CAPA helper
 #
-# $Id: lonhelper.pm,v 1.180.2.1 2010/08/14 20:19:42 raeburn 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 @@
 # 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 @@
     # FIXME: This should be parameterized, not concatenated - Jeremy
 
 
-    if (!$state->overrideForm()) { $result.='<form name="helpform" method="post">'; }
+    if (!$state->overrideForm()) { $result.='<form name="helpform" method="post" action="">'; }
     if ($stateHelp) {
         $stateHelp = &Apache::loncommon::help_open_topic($stateHelp);
     }
@@ -661,7 +661,7 @@
         </form>
 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();