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

Switch to side-by-side view

--- a/tcl/pd_menus.tcl
+++ b/tcl/pd_menus.tcl
@@ -476,7 +476,7 @@
 # update the list of windows on the Window menu. This expects run on the
 # Window menu, and to insert below the last separator
 proc ::pd_menus::update_window_menu {} {
-    set mymenu $::patch_menubar.window
+    set mymenu .menubar.window
     # find the last separator and delete everything after that
     for {set i 0} {$i <= [$mymenu index end]} {incr i} {
         if {[$mymenu type $i] eq "separator"} {

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

Sign up for the SourceForge newsletter:

JavaScript is required for this form.

No, thanks