Diff of /tcl/pdtk_canvas.tcl [b209a2] .. [4b0dc9]  Maximize  Restore

Switch to side-by-side view

--- a/tcl/pdtk_canvas.tcl
+++ b/tcl/pdtk_canvas.tcl
@@ -77,7 +77,7 @@
     set ::loaded($mytoplevel) 0
     toplevel $mytoplevel -width $width -height $height -class PatchWindow
     wm group $mytoplevel .
-    $mytoplevel configure -menu $::patch_menubar
+    if {$::windowingsystem ne "aqua"} {$mytoplevel configure -menu .menubar}
     # we have to wait until $mytoplevel exists before we can generate
     # a <<Loading>> event for it, that's why this is here and not in the

Get latest updates about Open Source Projects, Conferences and News.

Sign up for the SourceForge newsletter:

JavaScript is required for this form.

No, thanks