|
[Date Prev] [Date Next] [Thread Prev] [Thread Next] [Date Index] [Thread Index]
|
Re: Perl::Tk slowness? (fwd)
|
----- Forwarded message -----
Date: Tue, 16 Jul 2002 15:34:08 -0400
Subject: Re: Perl::Tk slowness?
From: Steve Lidie <sol0@lehigh.edu>
To: phl@lists.pm.org
On Tuesday, July 16, 2002, at 03:24 PM, Kyle R . Burton wrote:
> We're expereincing some strange behavior with Tk, I was hoping that some
> of
> you might have some insight into what's going on.
>
>
> We have the following program:
>
> ########################################
> use strict;
> use warnings;
> use Tk;
>
> my $mw = new MainWindow();
> my $widget = $mw->Button(-text => 'bleh')->pack;
>
> my $dialog = $widget->toplevel->DialogBox(
>
DialogBox is the giveaway. It's a known window manager bug. See the pTk
mailing list or comp.lang.perl.tk for yesterday to get the patch from Nick
...
Steve
OK, here, I found it first:
--- pTk/mTk/unix/tkUnixWm.c.old Mon Jul 15 09:02:53 2002
+++ pTk/mTk/unix/tkUnixWm.c Mon Jul 15 06:37:45 2002
@@ -4465,7 +4465,11 @@
* the window may not restack for a while and the application might
* observe it before it has restacked.
*/
+#if 1
+ XSync(winPtr->display,False);
+#else
WaitForConfigureNotify(winPtr, serial);
+#endif
}
/*
@@ -5306,5 +5310,6 @@
Tk_FreePixmap(winPtr->display, old);
}
}
+
----- End forwarded message -----
**Majordomo list services provided by PANIX <URL:http://www.panix.com>**
**To Unsubscribe, send "unsubscribe phl" to majordomo@lists.pm.org**
|
|