bitlair/revbank
6
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

New hook: "add"

Browse source
This commit is contained in:
Juerd Waalboer 2013-02-28 13:02:28 +01:00
parent 371b82baec
commit a1f20e67ce
2 changed files with 14 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

4
RevBank/Cart.pm
View file

@ -17,11 +17,13 @@ sub add {
my ($self, $user, $amount, $description, $data) = @_; my ($self, $user, $amount, $description, $data) = @_;
$user ||= '$you'; $user ||= '$you';
$data ||= {}; $data ||= {};
push @{ $self->{ $user } }, { my $item = {
%$data, # Internal stuff, not logged or printed. %$data, # Internal stuff, not logged or printed.
amount => $amount, amount => $amount,
description => $description, description => $description,
}; };
RevBank::Plugins::call_hooks("add", $self, $user, $item);
push @{ $self->{ $user } }, $item;
} }
sub empty { sub empty {

11
RevBank/Plugins.pm
View file

@ -228,6 +228,17 @@ Called when user input was given. C<$split_input> is a boolean that is true
if the input will be split on whitespace, rather than treated as a whole. if the input will be split on whitespace, rather than treated as a whole.
The input MAY be altered by the plugin. The input MAY be altered by the plugin.
=item hook_add $class, $cart, $user, $item
Called when something is added to the cart. Of course, like in C<< $cart->add
>>, C<$user> will be undef if the product is added for the current user.
C<$item> is a reference to a hash with the keys C<amount>, C<description> and
the metadata given in the C<add> call. Changing the values changes the actual
item going into the cart!
Be careful to avoid infinite loops if you add new stuff.
=item hook_checkout $class, $cart, $user, $transaction_id =item hook_checkout $class, $cart, $user, $transaction_id
Called when the transaction is finalized. Called when the transaction is finalized.