diff options
| author | lecoanet | 2000-02-02 14:01:15 +0000 |
|---|---|---|
| committer | lecoanet | 2000-02-02 14:01:15 +0000 |
| commit | 64089dca388f5a9a8235a94b4372763875132219 (patch) | |
| tree | 0455fa06d471a568cbece8fc27cde0216d4def23 /Perl/Zinc.xs | |
| parent | 2b91521b4c124546e59638f2e990dcbc75903d85 (diff) | |
| download | tkzinc-64089dca388f5a9a8235a94b4372763875132219.zip tkzinc-64089dca388f5a9a8235a94b4372763875132219.tar.gz tkzinc-64089dca388f5a9a8235a94b4372763875132219.tar.bz2 tkzinc-64089dca388f5a9a8235a94b4372763875132219.tar.xz | |
Passage en Zinc
Diffstat (limited to 'Perl/Zinc.xs')
| -rw-r--r-- | Perl/Zinc.xs | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/Perl/Zinc.xs b/Perl/Zinc.xs index 02df3c1..f062ef2 100644 --- a/Perl/Zinc.xs +++ b/Perl/Zinc.xs @@ -17,7 +17,7 @@ #include "tkGlue.m" extern int -RadarCmd( +ZincCmd( ClientData client_data, Tcl_Interp* interp, int argc, @@ -40,14 +40,14 @@ MapInfoCmd( DECLARE_VTABLES; -MODULE = Tk::Radar PACKAGE = Tk::Radar +MODULE = Tk::Zinc PACKAGE = Tk::Zinc PROTOTYPES: DISABLE BOOT: { IMPORT_VTABLES; - Lang_TkCommand("radar", RadarCmd); + Lang_TkCommand("zinc", ZincCmd); Lang_TkCommand("videomap", VideomapCmd); Lang_TkCommand("mapinfo", MapInfoCmd); } |