Lines 19-25
Link Here
|
19 |
|
19 |
|
20 |
use Modern::Perl; |
20 |
use Modern::Perl; |
21 |
|
21 |
|
22 |
use Test::More tests => 38; |
22 |
use Test::More tests => 40; |
23 |
use C4::Context; |
23 |
use C4::Context; |
24 |
|
24 |
|
25 |
BEGIN { |
25 |
BEGIN { |
Lines 27-47
BEGIN {
Link Here
|
27 |
} |
27 |
} |
28 |
|
28 |
|
29 |
my $default_layout = { |
29 |
my $default_layout = { |
30 |
creator => 'Labels', |
30 |
barcode_type => 'CODE39', |
31 |
layout_xml => '', |
31 |
callnum_split => 0, |
32 |
units => 'POINT', |
32 |
creator => 'Labels', |
33 |
start_label => 1, |
33 |
font => 'TR', |
34 |
barcode_type => 'CODE39', |
34 |
font_size => 3, |
35 |
printing_type => 'BAR', |
35 |
format_string => 'title, author, isbn, issn, itemtype, barcode, itemcallnumber', |
36 |
layout_name => 'TEST', |
36 |
guidebox => 0, |
37 |
guidebox => 0, |
37 |
layout_name => 'TEST', |
38 |
oblique_title => 1, |
38 |
layout_xml => '', |
39 |
font => 'TR', |
39 |
oblique_title => 1, |
40 |
font_size => 3, |
40 |
printing_type => 'BAR', |
41 |
callnum_split => 0, |
41 |
scale_height => 0.01, |
42 |
text_justify => 'L', |
42 |
scale_width => 0.8, |
43 |
format_string => 'title, author, isbn, issn, itemtype, barcode, itemcallnumber', |
43 |
start_label => 1, |
44 |
}; |
44 |
text_justify => 'L', |
|
|
45 |
units => 'POINT', |
46 |
}; |
45 |
|
47 |
|
46 |
my $layout; |
48 |
my $layout; |
47 |
|
49 |
|
48 |
- |
|
|