gitea
/
Koha-clms
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Bug 16053: Add tests 

Signed-off-by: Owen Leonard <oleonard@myacpl.org>

Signed-off-by: Katrin Fischer <katrin.fischer.83@web.de>

Signed-off-by: Brendan Gallagher brendan@bywatersolutions.com
This commit is contained in:
Jonathan Druart 2016-03-11 11:32:22 +00:00 committed by Brendan Gallagher
parent 101ba17685
commit b656d90147
1 changed files with 5 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
t/db_dependent/Koha/Acquisition/Currencies.t
View File

@ -18,7 +18,7 @@
# along with Koha; if not, see <http://www.gnu.org/licenses>.
use Modern::Perl;
use Test::More tests => 6;
use Test::More tests => 7;
use Koha::Database;
use Koha::Acquisition::Currency;
use Koha::Acquisition::Currencies;
@ -56,6 +56,10 @@ is( Koha::Acquisition::Currencies->search->count, $nb_of_currencies + 2, 'The 2
my $retrieved_currency_2 = Koha::Acquisition::Currencies->find( $new_currency_2->currency );
is( $retrieved_currency_2->active, 1, 'Active should have been set to 1' );
$retrieved_currency_2->store;
$retrieved_currency_2 = Koha::Acquisition::Currencies->find( $new_currency_2->currency );
is( $retrieved_currency_2->active, 1, 'Editing the existing active currency should not remove its active flag' );
my $active_currency = Koha::Acquisition::Currencies->get_active;
is ( $active_currency->currency, $retrieved_currency_2->currency, 'The active currency should be the last one marked as active' );