aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authormertz2004-11-16 20:46:14 +0000
committermertz2004-11-16 20:46:14 +0000
commit43e6583074814ec987f7bea6ea10bd89bc82c2fd (patch)
tree12b56634604d7112f48afd1dbf743c9ddcd71bf5
parent9f4e2c7bb267022948931aac9fb20e73f9f8282a (diff)
downloadtkzinc-43e6583074814ec987f7bea6ea10bd89bc82c2fd.zip
tkzinc-43e6583074814ec987f7bea6ea10bd89bc82c2fd.tar.gz
tkzinc-43e6583074814ec987f7bea6ea10bd89bc82c2fd.tar.bz2
tkzinc-43e6583074814ec987f7bea6ea10bd89bc82c2fd.tar.xz
modifying a test as from v3.30 the bbox of an empty text is ()
-rw-r--r--Perl/t/Bbox.t7
1 files changed, 4 insertions, 3 deletions
diff --git a/Perl/t/Bbox.t b/Perl/t/Bbox.t
index 226186b..5840fc3 100644
--- a/Perl/t/Bbox.t
+++ b/Perl/t/Bbox.t
@@ -1,7 +1,7 @@
#!/usr/bin/perl -w
#
-# $Id: Bbox.t,v 1.6 2004-09-17 11:51:10 mertz Exp $
+# $Id: Bbox.t,v 1.7 2004-11-16 20:46:14 mertz Exp $
# Author: Christophe Mertz
#
@@ -59,9 +59,10 @@ my $txt1 = $zinc->add('text', 1,
);
#print "bbox=(", join(',', $zinc->bbox($txt1)),")\n";
+# from v3.30 the bbox of an empty text is ()
ok(&similarFlatArray ([$zinc->bbox($txt1)],
- [30,25, 30,25+$linespace],
- [4, 4, 4, 4],
+ [],
+ [],
),
"bbox of empty text");