summaryrefslogtreecommitdiff
path: root/gdb/gdbtk/library/variables.tcl
diff options
context:
space:
mode:
Diffstat (limited to 'gdb/gdbtk/library/variables.tcl')
-rw-r--r--gdb/gdbtk/library/variables.tcl6
1 files changed, 5 insertions, 1 deletions
diff --git a/gdb/gdbtk/library/variables.tcl b/gdb/gdbtk/library/variables.tcl
index a1f15e2741d..eb4edc79551 100644
--- a/gdb/gdbtk/library/variables.tcl
+++ b/gdb/gdbtk/library/variables.tcl
@@ -425,7 +425,6 @@ class VariableWin {
# Find out what the previous entry is
set previous [getPrevious $variable]
- close $variable
$Hlist delete entry $variable
set cmd [format { \
@@ -644,6 +643,11 @@ class VariableWin {
# We must lookup all the variables for this struct
# debug "VariableWin::open $path"
+ # Cancel any edits
+ if {[info exists EditEntry]} {
+ UnEdit
+ }
+
if {!$Running} {
# Do not open disabled paths
if {$Update($this,$path)} {