aboutsummaryrefslogtreecommitdiff
path: root/Perl/t
diff options
context:
space:
mode:
authormertz2002-11-06 09:13:19 +0000
committermertz2002-11-06 09:13:19 +0000
commitd2bdcd8d24ef56831f3cceac6452420574f8e33a (patch)
tree858eaa45007452289c48e86495bb0789cc06e04e /Perl/t
parentac6b7e2dc2d1427d8bf05195912a97db57e12de1 (diff)
downloadtkzinc-d2bdcd8d24ef56831f3cceac6452420574f8e33a.zip
tkzinc-d2bdcd8d24ef56831f3cceac6452420574f8e33a.tar.gz
tkzinc-d2bdcd8d24ef56831f3cceac6452420574f8e33a.tar.bz2
tkzinc-d2bdcd8d24ef56831f3cceac6452420574f8e33a.tar.xz
suppression des items bezier
Diffstat (limited to 'Perl/t')
-rw-r--r--Perl/t/test-no-crash.pl3
1 files changed, 1 insertions, 2 deletions
diff --git a/Perl/t/test-no-crash.pl b/Perl/t/test-no-crash.pl
index cdc5821..5e2a82e 100644
--- a/Perl/t/test-no-crash.pl
+++ b/Perl/t/test-no-crash.pl
@@ -86,7 +86,7 @@ my $zinc = $mw->Zinc(-width => 500, -height => 500,
my %itemtypes;
my @itemtypes = qw(arc tabular track waypoint
- bezier curve rectangle triangles
+ curve rectangle triangles
group icon map reticle text window
);
@@ -136,7 +136,6 @@ sub creating_items {
&test_eval (1, "add", 'arc', 1, [10,10 , 50,50]);
- &test_eval (1, "add", 'bezier', 1, [10,10 , 50,50, 100,10, 10,200, 150,40]);
&test_eval (1, "add", 'curve', 1, [30,0 , 150,10, 100,110, 10,100, 50,140]);
&test_eval (1, "add", 'rectangle', 1, [400,400 , 450,220]);
&test_eval (1, "add", 'triangles', 1, [200,200 , 300,200 , 300,300, 200,300],