From 7d01e61cdf96f06d3f823eaaa435e2850bacf7e4 Mon Sep 17 00:00:00 2001 From: Galen Charlton Date: Mon, 30 Dec 2013 16:22:05 +0000 Subject: [PATCH] Bug 11402: (follow-up) add one more unit test This test exercise the case where defined parameters are passed to the _guide_box() routine. Signed-off-by: Galen Charlton --- t/Labels.t | 14 +++++++++++++- 1 file changed, 13 insertions(+), 1 deletion(-) diff --git a/t/Labels.t b/t/Labels.t index 0b2b804300..f762a733fb 100644 --- a/t/Labels.t +++ b/t/Labels.t @@ -20,7 +20,7 @@ use strict; use warnings; -use Test::More tests => 10; +use Test::More tests => 11; BEGIN { use_ok('C4::Labels::Label'); @@ -47,6 +47,18 @@ ok(!defined C4::Labels::Label::_guide_box($llx,$lly,undef,$height), "Test guide box with undefined 'width' returns undef"); ok(!defined C4::Labels::Label::_guide_box($llx,$lly,$width,undef), "Test guide box with undefined 'height' returns undef"); +is( + C4::Labels::Label::_guide_box($llx, $lly, $width, $height), + 'q +0.5 w +1.0 0.0 0.0 RG +1.0 1.0 1.0 rg +0 0 10 10 re +B +Q +', + 'Return guide box if all four parameters are defined' +); ok(C4::Labels::Label::_get_text_fields(), 'test getting textx fields'); -- 2.20.1