Revision 1ef37ef3
Von Jan Büren vor mehr als 6 Jahren hinzugefügt
t/bank/bank_transactions.t | ||
---|---|---|
946 | 946 |
# Jetzt gibt es zwei Kontobewegungen mit gleichen Punkten für eine Rechnung. |
947 | 947 |
# hier darf es auch keine Proposals geben |
948 | 948 |
|
949 |
my ( $bt_transactions, $proposals ) = $bt_controller->action_list;
|
|
949 |
( $bt_transactions, $proposals ) = $bt_controller->action_list; |
|
950 | 950 |
|
951 | 951 |
is(scalar(@$bt_transactions) , 2 , "$testname: two bank_transaction"); |
952 | 952 |
is(scalar(@$proposals) , 0 , "$testname: no proposals"); |
... | ... | |
956 | 956 |
# hier darf es auch keine Proposals geben |
957 | 957 |
$bt3->update_attributes( purpose => "fuer Rechnung salesinv10000"); |
958 | 958 |
|
959 |
my ( $bt_transactions, $proposals ) = $bt_controller->action_list;
|
|
959 |
( $bt_transactions, $proposals ) = $bt_controller->action_list; |
|
960 | 960 |
|
961 | 961 |
is(scalar(@$bt_transactions) , 2 , "$testname: two bank_transaction"); |
962 | 962 |
is(scalar(@$proposals) , 1 , "$testname: one proposal"); |
Auch abrufbar als: Unified diff
goodperl: Doppelte Variablennamen raus