aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorlecoanet2000-12-22 17:06:05 +0000
committerlecoanet2000-12-22 17:06:05 +0000
commit34db864664eebef8d387d1eef1663d53e9d80cc0 (patch)
treee0f3e8c78f23a07f2f69ea38a6b1ffab8289d519
parent638347ede5eefdf2e8a3f4e2f6a91fadf7044d01 (diff)
downloadtkzinc-34db864664eebef8d387d1eef1663d53e9d80cc0.zip
tkzinc-34db864664eebef8d387d1eef1663d53e9d80cc0.tar.gz
tkzinc-34db864664eebef8d387d1eef1663d53e9d80cc0.tar.bz2
tkzinc-34db864664eebef8d387d1eef1663d53e9d80cc0.tar.xz
Ajoute l'option -localrender comme speciale a la creation
-rw-r--r--Perl/Zinc.pm5
1 files changed, 5 insertions, 0 deletions
diff --git a/Perl/Zinc.pm b/Perl/Zinc.pm
index 5b93743..4ea3b43 100644
--- a/Perl/Zinc.pm
+++ b/Perl/Zinc.pm
@@ -16,6 +16,11 @@ bootstrap Tk::Zinc $Tk::VERSION;
sub Tk_cmd { \&Tk::zinc }
+sub CreateOptions
+{
+ return (shift->SUPER::CreateOptions,'-localrender')
+}
+
Tk::Methods("add", "addtag", "anchorxy", "bbox", "becomes", "bind", "cget",
"chggroup", "clone", "configure", "contour", "coords", "currentpart",
"cursor", "dchars", "dtag", "find", "fit", "focus", "gettags",