diff options
Diffstat (limited to 'ds9/library/wcs.tcl')
| -rw-r--r-- | ds9/library/wcs.tcl | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/ds9/library/wcs.tcl b/ds9/library/wcs.tcl index 2a98b6a..cab8e42 100644 --- a/ds9/library/wcs.tcl +++ b/ds9/library/wcs.tcl @@ -440,9 +440,8 @@ proc WCSDestroyDialog {} { if {[winfo exists $iwcs(top)]} { destroy $iwcs(top) destroy $iwcs(mb) + unset dwcs } - - unset dwcs } proc WCSSaveDialog {} { |