Fix previous checkin.

diff --git a/gdb/gdbtk/ChangeLog b/gdb/gdbtk/ChangeLog
index 9eaf29f..9e66e55 100644 (file)
--- a/gdb/gdbtk/ChangeLog
+++ b/gdb/gdbtk/ChangeLog
@@ -2,7 +2,7 @@
 
        * library/vartree.itb (_but3): Add popup menu item to dump
        memory at the value of the variable.
-       
+
        * library/vartree.itb (buildlayer): Check for error when updating
        a variable's value.
        (update_var): Ditto.

diff --git a/gdb/gdbtk/library/vartree.itb b/gdb/gdbtk/library/vartree.itb
index e1dba71..2c1dc30 100644 (file)
--- a/gdb/gdbtk/library/vartree.itb
+++ b/gdb/gdbtk/library/vartree.itb
@@ -344,7 +344,7 @@ itcl::body  VarTree::_but3 {x y X Y} {
   $pop add command -label "Delete" -command [code $this remove $var]
   if {![catch {$var value} value]} {
     $pop add separator   
-    $pop add command -label "Dump Memory at $value" -command [list ManagedWin::open MemWin -force -addr_exp $value]
+    $pop add command -label "Dump Memory at [$var name]" -command [list ManagedWin::open MemWin -force -addr_exp [$var name]]
   }
   $pop add separator
   if {$type == "local"} {