hi all,
just updated tcl/tk to 8.4.something. Getting Pd to use it requires this:
--- pd.tk~ 2003-05-05 13:40:42.000000000 +0200 +++ pd.tk 2003-05-29 14:21:24.000000000 +0200 @@ -912,8 +912,8 @@ bind $name.c <KeyRelease> {pdtk_canvas_keyup %W %K %A} bind $name.c <Motion> {pdtk_canvas_motion %W %x %y 0} bind $name.c <Alt-Motion> {pdtk_canvas_motion %W %x %y 4}
-# bind $name.c <Unmap> {puts stderr map}
@@ -1117,7 +1117,7 @@ # invisible (arg is ""). Invisibility means the Window Manager has minimized # us. We don't get a final "unmap" event when we destroy the window. proc pdtk_canvas_map {name arg} {
yup, it works now :) thnx!
On Thu, 29 May 2003, Krzysztof Czaja wrote:
hi all,
just updated tcl/tk to 8.4.something. Getting Pd to use it requires this:
--- pd.tk~ 2003-05-05 13:40:42.000000000 +0200 +++ pd.tk 2003-05-29 14:21:24.000000000 +0200 @@ -912,8 +912,8 @@ bind $name.c <KeyRelease> {pdtk_canvas_keyup %W %K %A} bind $name.c <Motion> {pdtk_canvas_motion %W %x %y 0} bind $name.c <Alt-Motion> {pdtk_canvas_motion %W %x %y 4}
- bind $name.c <Map> {pdtk_canvas_map %W %s}
-# bind $name.c <Unmap> {puts stderr map}
- bind $name.c <Map> {pdtk_canvas_map %W 1}
- bind $name.c <Unmap> {pdtk_canvas_map %W 0} focus $name.c # puts stderr "all done" # after 1 [concat raise $name]
@@ -1117,7 +1117,7 @@ # invisible (arg is ""). Invisibility means the Window Manager has minimized # us. We don't get a final "unmap" event when we destroy the window. proc pdtk_canvas_map {name arg} {
- if {$arg == "0"} {
- if {$arg} { pd [canvastosym $name] map 1 ; } else { pd [canvastosym $name] map 0 ;
PD-list mailing list PD-list@iem.kug.ac.at http://iem.kug.ac.at/cgi-bin/mailman/listinfo/pd-list
hi again,
I am sorry, but it is better to make just this single change:
--- pd.tk~ 2003-04-06 03:35:29.000000000 +0200 +++ pd.tk 2003-05-29 15:52:16.000000000 +0200 @@ -911,7 +911,7 @@ bind $name.c <KeyRelease> {pdtk_canvas_keyup %W %K %A} bind $name.c <Motion> {pdtk_canvas_motion %W %x %y 0} bind $name.c <Alt-Motion> {pdtk_canvas_motion %W %x %y 4}
In fact, the previous diff, while based on common sense, did not handle switching virtual desktops, nor minimizing... to hell with common sense...
Krzysztof
On Thursday, May 29, 2003, at 10:02 AM, Krzysztof Czaja wrote:
I am sorry, but it is better to make just this single change:
--- pd.tk~ 2003-04-06 03:35:29.000000000 +0200 +++ pd.tk 2003-05-29 15:52:16.000000000 +0200 @@ -911,7 +911,7 @@ bind $name.c <KeyRelease> {pdtk_canvas_keyup %W %K %A} bind $name.c <Motion> {pdtk_canvas_motion %W %x %y 0} bind $name.c <Alt-Motion> {pdtk_canvas_motion %W %x %y 4}
- bind $name.c <Map> {pdtk_canvas_map %W %s}
- bind $name.c <Map> {pdtk_canvas_map %W 0}
In fact, the previous diff, while based on common sense, did not handle switching virtual desktops, nor minimizing... to hell with common sense...
hi Krzysztof,
...THANKS!!! I just tried this with the OSX version and tcl/tk 8.4.3, and now the objects are being drawn visibly!
...now, what was I doing before this little detour...?
l8r, jamie