aboutsummaryrefslogtreecommitdiff
path: root/Perl/demos/Tk/demos/zinc_lib/items.pl
diff options
context:
space:
mode:
authormertz2002-03-13 13:42:15 +0000
committermertz2002-03-13 13:42:15 +0000
commitb30699c212d94b9943c192836ae7eb4bffb09209 (patch)
treedbebd6906fd7f769342f478e50fd52b8b8cd4866 /Perl/demos/Tk/demos/zinc_lib/items.pl
parent6718774dbd269308e23ac0fdc8fce24ea8d47e63 (diff)
downloadtkzinc-b30699c212d94b9943c192836ae7eb4bffb09209.zip
tkzinc-b30699c212d94b9943c192836ae7eb4bffb09209.tar.gz
tkzinc-b30699c212d94b9943c192836ae7eb4bffb09209.tar.bz2
tkzinc-b30699c212d94b9943c192836ae7eb4bffb09209.tar.xz
suppression de code dupliqu� par erreur
Diffstat (limited to 'Perl/demos/Tk/demos/zinc_lib/items.pl')
-rw-r--r--Perl/demos/Tk/demos/zinc_lib/items.pl5
1 files changed, 0 insertions, 5 deletions
diff --git a/Perl/demos/Tk/demos/zinc_lib/items.pl b/Perl/demos/Tk/demos/zinc_lib/items.pl
index 5ae9774..a6cd5ff 100644
--- a/Perl/demos/Tk/demos/zinc_lib/items.pl
+++ b/Perl/demos/Tk/demos/zinc_lib/items.pl
@@ -133,11 +133,6 @@ foreach my $fieldId (1..5) {
);
}
-my $waypoint = $zinc->add('waypoint', 1, 6, -position => [100,520],
- -labelformat => $labelformat,
- -symbol => "AtcSymbol2",
- -labeldistance => 30);
-
$zinc->add('text', 1,
-font => $defaultfont,