diff options
| author | lecoanet | 2000-02-02 13:59:32 +0000 |
|---|---|---|
| committer | lecoanet | 2000-02-02 13:59:32 +0000 |
| commit | 2b91521b4c124546e59638f2e990dcbc75903d85 (patch) | |
| tree | baa98640217261a2b1ffce90e9dede2386fa87dd /Perl/Zinc.pm | |
| parent | 718ca6879f5614bf9a023c538fb094750d546122 (diff) | |
| download | tkzinc-2b91521b4c124546e59638f2e990dcbc75903d85.zip tkzinc-2b91521b4c124546e59638f2e990dcbc75903d85.tar.gz tkzinc-2b91521b4c124546e59638f2e990dcbc75903d85.tar.bz2 tkzinc-2b91521b4c124546e59638f2e990dcbc75903d85.tar.xz | |
Passage en Zinc.
Adaptation � Solaris et d�termination auto des chemins
dans Makefile.
Diffstat (limited to 'Perl/Zinc.pm')
| -rw-r--r-- | Perl/Zinc.pm | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/Perl/Zinc.pm b/Perl/Zinc.pm index e7139d2..46a10d1 100644 --- a/Perl/Zinc.pm +++ b/Perl/Zinc.pm @@ -1,4 +1,4 @@ -package Tk::Radar; +package Tk::Zinc; #require Tk; use Tk; @@ -6,15 +6,15 @@ use Tk; #use Exporter; use base qw(Tk::Widget); -Construct Tk::Widget 'Radar'; +Construct Tk::Widget 'Zinc'; use vars qw($VERSION); $VERSION = '1.000'; -bootstrap Tk::Radar $Tk::VERSION; +bootstrap Tk::Zinc $Tk::VERSION; -sub Tk_cmd { \&Tk::radar } +sub Tk_cmd { \&Tk::zinc } Tk::Methods("add", "addtag", "anchorxy", "bbox", "becomes", "bind", "cget", "chggroup", "clone", "configure", "coords", "currentpart", "dtag", "find", |