[Magic-dev] Re: magic bug?

[R. Timothy Edwards]

Dear Greg,

> I start magic with "magic -w -dOGL".  Then pressing close on the
> file menu presents a window stating; 'Error: Invalid command name
> ".cellmgr.target.list.winmenu"'.  This error is displayed whether
> or not a file is loaded.

   I fixed this problem in 7.3, but it was one of those rushed days
and I never got around to updating version 7.2 to match.  The command
should be checking for the presence of the "cell manager" window
*before* attempting to execute a cell manager command.  It is a
trivial fix, and I will take care of it.  The relevant lines are in
wrapper.tcl (/usr/local/lib/magic/tcl/wrapper.tcl), starting at line
1141, and should read thus:

-----------------------------------------------------------
# Delete the wrapper and the layout window in it.

proc magic::closewrapper { framename } {
   global MagicBLT
   global Opts

   # Remove this window from the target list in cellmanager
   if {$MagicBLT} {
      if {![catch {wm state .cellmgr}]} {
         if { $Opts(target) == "${framename}.magic" } {
            set Opts(target) "default"
            .cellmgr.target.list configure -text "default"
         }
         set idx [.cellmgr.target.list.winmenu index $framename ]
         .cellmgr.target.list.winmenu delete $idx
      }
   }

   ${framename}.magic magic::closewindow
   destroy $framename
}
-----------------------------------------------------------

					Regards,
					Tim