revspace_lasercutter: fix direction
Oops, lasercutting should cost money, not generate it...
This commit is contained in:
parent
3b6f11f0dd
commit
4abce51769
2 changed files with 3 additions and 3 deletions
|
@ -23,8 +23,8 @@ sub time ($self, $cart, $time, @) {
|
|||
$time = int($q / 4) . ":" . sprintf("%02d", ($q % 4) * 15);
|
||||
|
||||
$cart
|
||||
->add($q * $cost, "Lasercutter usage ($time)")
|
||||
->add_contra("+sales/lasercutter", -$q * $cost, "\$you used lasercutter ($time)");
|
||||
->add(-$q * $cost, "Lasercutter usage ($time)")
|
||||
->add_contra("+sales/lasercutter", $q * $cost, "\$you used lasercutter ($time)");
|
||||
|
||||
return ACCEPT;
|
||||
}
|
||||
|
|
2
revbank
2
revbank
|
@ -17,7 +17,7 @@ use RevBank::Messages;
|
|||
use RevBank::Cart;
|
||||
use RevBank::Prompt;
|
||||
|
||||
our $VERSION = "7.2.2";
|
||||
our $VERSION = "7.2.3";
|
||||
|
||||
our %HELP1 = (
|
||||
"abort" => "Abort the current transaction",
|
||||
|
|
Loading…
Add table
Reference in a new issue