oqapi/webgui
2
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

a ton of $session fixes (thanks to Colin), and a new $session checker, that supposedly, shouldn't be needed now. It can be backed out, however, easily.

Browse source
This commit is contained in:
Matthew Wilson 2006-01-16 22:45:21 +00:00
parent 5fadc70eac
commit 09483e18c5
208 changed files with 505 additions and 533 deletions
Download patch file Download diff file Expand all files Collapse all files

8
lib/WebGUI/Operation/TransactionLog.pm
View file

@ -29,7 +29,7 @@ This error message will be added to the template variables.
=cut
sub www_viewPurchaseHistory {
my $session = shift;
my $session = shift; use WebGUI; WebGUI::dumpSession($session);
my (@history, @historyLoop, %var, %properties);
$var{errorMessage} = shift;
@ -63,7 +63,7 @@ $session->form->process("tid").
=cut
sub www_cancelRecurringTransaction {
my $session = shift;
my $session = shift; use WebGUI; WebGUI::dumpSession($session);
my ($transaction, $error, $message);
my $i18n = WebGUI::International->new($session, "TransactionLog");
@ -89,7 +89,7 @@ Afterward, it calls www_listTransactions
=cut
sub www_deleteTransaction {
my $session = shift;
my $session = shift; use WebGUI; WebGUI::dumpSession($session);
my $transactionId;
return $session->privilege->insufficient unless ($session->user->isInGroup(3));
@ -103,7 +103,7 @@ sub www_deleteTransaction {
#-------------------------------------------------------------------
sub www_deleteTransactionItem {
my $session = shift;
my $session = shift; use WebGUI; WebGUI::dumpSession($session);
return $session->privilege->insufficient unless ($session->user->isInGroup(3));
WebGUI::Commerce::Transaction->new($session, $session->form->process("tid"))->deleteItem($session->form->process("iid"), $session->form->process("itype"));