Committer: akanashin
LJSUP-11857: Cyr sub domainsU trunk/cgi-bin/LJ/Console/Command/DomainRU.pm
Modified: trunk/cgi-bin/LJ/Console/Command/DomainRU.pm =================================================================== --- trunk/cgi-bin/LJ/Console/Command/DomainRU.pm 2012-04-27 07:11:55 UTC (rev 11839) +++ trunk/cgi-bin/LJ/Console/Command/DomainRU.pm 2012-04-27 08:34:07 UTC (rev 11840) @@ -70,12 +70,14 @@ } elsif ($action eq 'remove') { $reason ||= 'removed by support'; LJ::Pay::Payment::PayItem::DomainRU->delete_domains($account, $domain, $reason); + LJ::Pay::Wallet->try_add($LJ::Pay::Payment::PayItem::DomainRU::shop_price); return $self->print("Domain removed"); } elsif ($action eq 'show') { my $domains = LJ::Pay::Payment::PayItem::DomainRU->get_domains($u); for (@$domains) { $self->print($_->{dom}." -> ".$_->{auth}); - } + } + return $self->print("Done"); } else { return $self->error("Unknown action. Consult the reference.") }