diff options
author | William Joye <wjoye@cfa.harvard.edu> | 2018-03-02 22:18:12 (GMT) |
---|---|---|
committer | William Joye <wjoye@cfa.harvard.edu> | 2018-03-02 22:18:12 (GMT) |
commit | f4a302585608ea738769a5ea3b83577723989a2a (patch) | |
tree | 5a6254a01fa30e31c90111312cff46ca2e598453 /ds9/library/contour.tcl | |
parent | d3b02990042d906a637b240a68529b9257045001 (diff) | |
download | blt-f4a302585608ea738769a5ea3b83577723989a2a.zip blt-f4a302585608ea738769a5ea3b83577723989a2a.tar.gz blt-f4a302585608ea738769a5ea3b83577723989a2a.tar.bz2 |
fix -close issue if no -open first
Diffstat (limited to 'ds9/library/contour.tcl')
-rw-r--r-- | ds9/library/contour.tcl | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/ds9/library/contour.tcl b/ds9/library/contour.tcl index cdbb61a..8fd8468 100644 --- a/ds9/library/contour.tcl +++ b/ds9/library/contour.tcl @@ -336,9 +336,8 @@ proc ContourDestroyDialog {} { if {[winfo exists $icontour(top)]} { destroy $icontour(top) destroy $icontour(mb) + unset dcontour } - - unset dcontour } proc ContourGenerateDialog {} { |