From a99ae769c1cd9eaad75cb80d3658d4c02f06e357 Mon Sep 17 00:00:00 2001 From: didier Date: Tue, 13 Nov 2007 14:50:23 +0000 Subject: Correction bug... --- src/MTools/Widget/MToggleBouton.pm | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/src/MTools/Widget/MToggleBouton.pm b/src/MTools/Widget/MToggleBouton.pm index cc014f5..d10170d 100644 --- a/src/MTools/Widget/MToggleBouton.pm +++ b/src/MTools/Widget/MToggleBouton.pm @@ -70,7 +70,7 @@ sub new { push (@gon1, $txt1); push (@goff1, $txt1); push (@gover1, $txt1); - plink ([$self, 'text1'], [$txt1, '-text1']); + plink ([$self, 'text1'], [$txt1, '-text']); } if (defined $options {g_text2}) { @@ -79,7 +79,7 @@ sub new { push (@gon2, $txt2); push (@goff2, $txt2); push (@gover2, $txt2); - plink ([$self, 'text2'], [$txt2, '-text2']); + plink ([$self, 'text2'], [$txt2, '-text']); } -- cgit v1.1