diff options
| author | Q. Zero Lee <qzerolee@hotmail.com> | 2015-08-25 22:41:22 +0800 |
|---|---|---|
| committer | Q. Zero Lee <qzerolee@hotmail.com> | 2015-08-25 22:41:22 +0800 |
| commit | 9650cdc12468e91cb7a64aad6017671b7a40c1ef (patch) | |
| tree | 11af2c13a15435b1b5959ee116ae0039979fe680 /tcl.html.markdown | |
| parent | b7f18b1cc223f9c0dbe2a36d6cf0955c4c14ff90 (diff) | |
Added a dollar
Diffstat (limited to 'tcl.html.markdown')
| -rw-r--r-- | tcl.html.markdown | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/tcl.html.markdown b/tcl.html.markdown index 79b5e87d..c1cd42ca 100644 --- a/tcl.html.markdown +++ b/tcl.html.markdown @@ -257,7 +257,7 @@ proc greet greeting\ name return\ \"Hello,\ \$name! proc fold {cmd args} { set res 0 foreach arg $args { - set res [cmd $res $arg] + set res [$cmd $res $arg] } } fold ::tcl::mathop::* 5 3 3 ;# -> 45 |