You are viewing a plain text version of this content. The canonical link for it is here.
Posted to site-cvs@tcl.apache.org by mx...@apache.org on 2016/09/07 22:50:37 UTC
svn commit: r1759721 - in /tcl/rivet/trunk: ChangeLog
rivet/rivet-tcl/catch.tcl
Author: mxmanghi
Date: Wed Sep 7 22:50:36 2016
New Revision: 1759721
URL: http://svn.apache.org/viewvc?rev=1759721&view=rev
Log:
* rivet/rivet-tcl/catch.tcl: fixed argument management in ::catch call
Modified:
tcl/rivet/trunk/ChangeLog
tcl/rivet/trunk/rivet/rivet-tcl/catch.tcl
Modified: tcl/rivet/trunk/ChangeLog
URL: http://svn.apache.org/viewvc/tcl/rivet/trunk/ChangeLog?rev=1759721&r1=1759720&r2=1759721&view=diff
==============================================================================
--- tcl/rivet/trunk/ChangeLog (original)
+++ tcl/rivet/trunk/ChangeLog Wed Sep 7 22:50:36 2016
@@ -1,3 +1,6 @@
+2016-09-07 Massimo Manghi <mx...@apache.org>
+ * rivet/rivet-tcl/catch.tcl: fixed argument management in ::catch call
+
2016-09-06 Massimo Manghi <mx...@apache.org>
* doc/xml/lazybridge.xml: further lazybridge documentation
development
Modified: tcl/rivet/trunk/rivet/rivet-tcl/catch.tcl
URL: http://svn.apache.org/viewvc/tcl/rivet/trunk/rivet/rivet-tcl/catch.tcl?rev=1759721&r1=1759720&r2=1759721&view=diff
==============================================================================
--- tcl/rivet/trunk/rivet/rivet-tcl/catch.tcl (original)
+++ tcl/rivet/trunk/rivet/rivet-tcl/catch.tcl Wed Sep 7 22:50:36 2016
@@ -12,7 +12,7 @@ namespace eval ::rivet {
proc catch {script args} {
- set catch_ret [uplevel ::catch $script $args]
+ set catch_ret [uplevel [list ::catch $script] $args]
if {$catch_ret && [::rivet::abort_page -aborting]} {
---------------------------------------------------------------------
To unsubscribe, e-mail: site-cvs-unsubscribe@tcl.apache.org
For additional commands, e-mail: site-cvs-help@tcl.apache.org