fix: op=editSubscription causes fatal

This commit is contained in:
Roy Johnson 2006-06-15 20:22:16 +00:00
parent 72654a1b24
commit d5d9f05500
2 changed files with 8 additions and 6 deletions

View file

@ -57,7 +57,9 @@
- fix: DataForm - fix: DataForm
- Many template fixes. - Many template fixes.
- fix: Dashboard - can't instantiate - fix: Dashboard - can't instantiate
- fix: More DataForm bugs
- Added new template vars to DataForm
- fix: op=editSubscription causes fatal
6.99.3 6.99.3
- Someone removed the status from the submission templates. That has been - Someone removed the status from the submission templates. That has been

View file

@ -75,7 +75,7 @@ The i18n key of the help link for this workarea.
sub _submenu { sub _submenu {
my $session = shift; my $session = shift;
my $i18n = WebGUI::International->new($session, "Subscription"); my $i18n = WebGUI::International->new($session, "Subscription");
my $workarea = shift; my $workarea = shift;
my $title = shift; my $title = shift;
$title = $i18n->get($title) if ($title); $title = $i18n->get($title) if ($title);
@ -309,6 +309,7 @@ sub www_editSubscription {
unless ($session->form->process("sid") eq 'new') { unless ($session->form->process("sid") eq 'new') {
$properties = WebGUI::Subscription->new($session,$session->form->process("sid"))->get; $properties = WebGUI::Subscription->new($session,$session->form->process("sid"))->get;
} }
$subscriptionId = $session->form->process("sid") || 'new'; $subscriptionId = $session->form->process("sid") || 'new';
$f = WebGUI::HTMLForm->new($session); $f = WebGUI::HTMLForm->new($session);
@ -352,9 +353,9 @@ sub www_editSubscription {
$f->selectBox( $f->selectBox(
-name => 'duration', -name => 'duration',
-label => $i18n->get('subscription duration'), -label => $i18n->get('subscription duration'),
-hoverHelp => $i18n->get('subscription duration description'), -hoverHelp => $i18n->get('subscription duration description'),
-value => [$properties->{duration} || 'Monthly'], -value => $properties->{duration} || 'Monthly',
-options=> WebGUI::Commerce::Payment::recurringPeriodValues($session), -options=> WebGUI::Commerce::Payment->recurringPeriodValues($session),
); );
$f->text( $f->text(
-name => 'executeOnSubscription', -name => 'executeOnSubscription',
@ -371,7 +372,6 @@ sub www_editSubscription {
); );
} }
$f->submit; $f->submit;
return _submenu($session,$f->print, 'edit subscription title', 'subscription add/edit'); return _submenu($session,$f->print, 'edit subscription title', 'subscription add/edit');
} }