diff options
| -rw-r--r-- | ChangeLog | 5 | ||||
| -rw-r--r-- | library/history.tcl | 2 |
2 files changed, 6 insertions, 1 deletions
@@ -1,3 +1,8 @@ +2011-11-25 Donal K. Fellows <dkf@users.sf.net> + + * library/history.tcl (history): Simplify the dance of variable + management used when chaining to the implementation command. + 2011-11-22 Donal K. Fellows <dkf@users.sf.net> * generic/tclExecute.c (TclCompileObj): Simplify and de-indent the diff --git a/library/history.tcl b/library/history.tcl index fb722c8..51d2404 100644 --- a/library/history.tcl +++ b/library/history.tcl @@ -53,7 +53,7 @@ proc ::history {args} { } # Tricky stuff needed to make stack and errors come out right! - tailcall apply {args {tailcall history {*}$args} ::tcl} {*}$args + tailcall apply {arglist {tailcall history {*}$arglist} ::tcl} $args } # tcl::HistAdd -- |