From 1678e1a41abb99804e2f5b402ebc77204de3e5b5 Mon Sep 17 00:00:00 2001
From: etienne
Date: Fri, 16 May 2003 14:23:46 +0000
Subject: correction vilaine coquille

---
 Perl/Zinc/Trace.pm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'Perl/Zinc')

diff --git a/Perl/Zinc/Trace.pm b/Perl/Zinc/Trace.pm
index 0d11b54..ad0015f 100644
--- a/Perl/Zinc/Trace.pm
+++ b/Perl/Zinc/Trace.pm
@@ -49,7 +49,7 @@ sub Tk::Zinc::WidgetMethod {
     $filename="" unless defined $filename;
     $line="" unless defined $line;
     print "TRACE: $filename line $line $name";
-    &printList (@_);
+    &printList (@args);
     # invoke function possibly overloaded in other modules
     if (wantarray()) {
 	my @res = &$WidgetMethodfunction(@_) if $WidgetMethodfunction;
-- 
cgit v1.1