View | Details | Raw Unified | Return to bug 21580
Collapse All | Expand All

(-)a/t/Edifact.t (-2 / +2 lines)
Lines 3-9 use strict; Link Here
3
use warnings;
3
use warnings;
4
use FindBin qw( $Bin );
4
use FindBin qw( $Bin );
5
5
6
use Test::More tests => 34;
6
use Test::More tests => 35;
7
7
8
BEGIN { use_ok('Koha::Edifact') }
8
BEGIN { use_ok('Koha::Edifact') }
9
9
Lines 40-45 is( $m->message_reference_number, Link Here
40
    'MQ09791', "Message reference number returned" );
40
    'MQ09791', "Message reference number returned" );
41
is( $m->docmsg_number, 'Q741588',  "Message docmsg number returned" );
41
is( $m->docmsg_number, 'Q741588',  "Message docmsg number returned" );
42
is( $m->message_date,  '20140430', "Message date returned" );
42
is( $m->message_date,  '20140430', "Message date returned" );
43
is( $m->buyer_ean, '5030670137480', 'buyer ean returned');
43
44
44
my $lin = $m->lineitems();
45
my $lin = $m->lineitems();
45
46
46
- 

Return to bug 21580