diff --git a/docs/changelog/7.x.x.txt b/docs/changelog/7.x.x.txt index ed235f27b..89fc980fe 100644 --- a/docs/changelog/7.x.x.txt +++ b/docs/changelog/7.x.x.txt @@ -4,6 +4,7 @@ stop problems from certain flags that get set once per session. - fixed: Clicking on Widget gear causes user to jump to another part of the page. - fixed: Manage Subscription Code Batches: Names of Batches not Displayed + - fixed: Manage Subscription Codes: No way to Select 7.5.17 - fixed: Payment Methods Hover Help Incomplete diff --git a/lib/WebGUI/Asset/Sku/Subscription.pm b/lib/WebGUI/Asset/Sku/Subscription.pm index ed5b5abd2..15081961e 100644 --- a/lib/WebGUI/Asset/Sku/Subscription.pm +++ b/lib/WebGUI/Asset/Sku/Subscription.pm @@ -737,7 +737,7 @@ sub www_listSubscriptionCodeBatches { $output .= '
| ';
- $output .= $session->icon->delete(
+ $output .= $session->icon->delete(
'func=deleteSubscriptionCodeBatch;bid='.$batch->{batchId},
$self->getUrl,
$i18n->get('delete batch confirm'));
@@ -780,7 +780,7 @@ sub www_listSubscriptionCodes {
my $batchId = $session->form->process('bid');
my $selection = $session->form->process('selection');
my $batches =
- $session->db->buildHashRef('select batchId, description from Subscription_codeBatch where subscriptionId=?',
+ $session->db->buildHashRef('select batchId, name from Subscription_codeBatch where subscriptionId=?',
[
$self->getId,
]);
@@ -816,7 +816,7 @@ sub www_listSubscriptionCodes {
$f->readOnly(
label =>
WebGUI::Form::radio( $session, { name => 'selection', value => 'b', checked => ($selection eq 'b') } )
- . $i18n->get('selection batch id'),
+ . $i18n->get('selection batch name'),
value =>
WebGUI::Form::selectBox( $session, { name => 'bid', value => $batchId, options => $batches } ),
);
@@ -860,7 +860,7 @@ sub www_listSubscriptionCodes {
$output .= ' '; $output .= '
|