From 7e761305348875b203b1404d7d91cb202855db00 Mon Sep 17 00:00:00 2001 From: Tom Tromey Date: Thu, 7 Dec 2000 20:00:44 +0000 Subject: [PATCH] * srcwin.itb (SrcWin::edit): Use uplevel, not eval, to evaluate external editor expression. --- gdb/gdbtk/library/ChangeLog | 5 +++++ gdb/gdbtk/library/srcwin.itb | 2 +- 2 files changed, 6 insertions(+), 1 deletion(-) diff --git a/gdb/gdbtk/library/ChangeLog b/gdb/gdbtk/library/ChangeLog index 89ff853ab9..1fa77c48bc 100644 --- a/gdb/gdbtk/library/ChangeLog +++ b/gdb/gdbtk/library/ChangeLog @@ -1,3 +1,8 @@ +2000-12-07 Tom Tromey + + * srcwin.itb (SrcWin::edit): Use uplevel, not eval, to evaluate + external editor expression. + 2000-12-06 Tom Tromey * targetselection.itb (TargetSelection::build_win): Add option to diff --git a/gdb/gdbtk/library/srcwin.itb b/gdb/gdbtk/library/srcwin.itb index 9388aa69aa..6956f31f4a 100644 --- a/gdb/gdbtk/library/srcwin.itb +++ b/gdb/gdbtk/library/srcwin.itb @@ -663,7 +663,7 @@ body SrcWin::edit {} { if {[info exists enable_external_editor] && $enable_external_editor} { - if {[catch {eval $external_editor_command edit $loc_info} err]} { + if {[catch {uplevel \#0 "$external_editor_command edit $loc_info"} ]} { tk_dialog .warn-sn "Edit" $err error 0 Ok } return -- 2.11.0