summaryrefslogtreecommitdiffstats
path: root/ds9/library/contour.tcl
diff options
context:
space:
mode:
authorWilliam Joye <wjoye@cfa.harvard.edu>2018-03-02 22:18:12 (GMT)
committerWilliam Joye <wjoye@cfa.harvard.edu>2018-03-02 22:18:12 (GMT)
commitf4a302585608ea738769a5ea3b83577723989a2a (patch)
tree5a6254a01fa30e31c90111312cff46ca2e598453 /ds9/library/contour.tcl
parentd3b02990042d906a637b240a68529b9257045001 (diff)
downloadblt-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.tcl3
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 {} {