diff options
author | Steve Bennett <steveb@workware.net.au> | 2012-02-17 18:30:49 +1000 |
---|---|---|
committer | Steve Bennett <steveb@workware.net.au> | 2012-02-17 18:49:31 +1000 |
commit | 8243f17e06a2b2bac9ac0b99b881b5e632201bcc (patch) | |
tree | af5a9af978d5e2cc367ff3001a6e54f195e234a3 /tests/subst.test | |
parent | ba028faf4f740dcd364f9136399b599ea7d1f6d9 (diff) | |
download | jimtcl-8243f17e06a2b2bac9ac0b99b881b5e632201bcc.zip jimtcl-8243f17e06a2b2bac9ac0b99b881b5e632201bcc.tar.gz jimtcl-8243f17e06a2b2bac9ac0b99b881b5e632201bcc.tar.bz2 |
subst -noc should substitute vars inside brackets
This also simplifies and shrinks the implementation of subst
Signed-off-by: Steve Bennett <steveb@workware.net.au>
Diffstat (limited to 'tests/subst.test')
-rw-r--r-- | tests/subst.test | 6 |
1 files changed, 6 insertions, 0 deletions
diff --git a/tests/subst.test b/tests/subst.test index 4a084d9..353af5f 100644 --- a/tests/subst.test +++ b/tests/subst.test @@ -168,5 +168,11 @@ test subst-12.2 {lone $} { subst -novar {${a}} } {${a}} +test subst-12.3 {variable inside [] with -noc} { + set a 1 + subst -noc {x[join $a]y} +} {x[join 1]y} + + # cleanup testreport |