--- loncom/interface/Attic/lonwizard.pm 2003/02/21 18:50:09 1.11 +++ loncom/interface/Attic/lonwizard.pm 2003/02/21 21:27:28 1.12 @@ -30,6 +30,8 @@ use Apache::loncommon; =head1 Class: lonwizard +FIXME: Doc the parameters of the wizard well: Title, Data (Query string), URL. + =head2 lonwizard Attributes =over 4 @@ -59,6 +61,7 @@ sub new { $self->{TITLE} = shift; $self->{DATA} = shift; + $self->{URL} = shift; &Apache::loncommon::get_unprocessed_cgi($self->{DATA}); @@ -214,7 +217,7 @@ sub display { if ($self->{STATE} ne "START" || $ENV{"form.SUBMIT"} eq "Next ->") { my $prevState = $self->{STATES}{$self->{STATE}}; - $prevState->postprocess(); + $prevState->postprocess(); } # Note, to handle errors in a state's input that a user must correct, @@ -1274,7 +1277,7 @@ sub render { Apache::lonnavmaps::resource()], 'showParts' => 0, 'queryString' => $wizard->queryStringVars() . '&folderManip=1', - 'url' => '/adm/wizard', + 'url' => $wizard->{URL}, 'filterFunc' => $filterFunc } ); $result .= $self->{MESSAGE_AFTER} if (defined $self->{MESSAGE_AFTER});