|
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 |
- |
|
|