diff options
author | patthoyts <patthoyts@noemail.net> | 2007-11-25 10:56:27 (GMT) |
---|---|---|
committer | patthoyts <patthoyts@noemail.net> | 2007-11-25 10:56:27 (GMT) |
commit | 19c4178fa4729e53a6c5d3471e948b50704a7a7d (patch) | |
tree | f35585a687356a7812a7e14dc7d0baa69172e718 /tests/ttk | |
parent | cfb2aab094f7772ae74cd548432bd523c79b9411 (diff) | |
download | tk-19c4178fa4729e53a6c5d3471e948b50704a7a7d.zip tk-19c4178fa4729e53a6c5d3471e948b50704a7a7d.tar.gz tk-19c4178fa4729e53a6c5d3471e948b50704a7a7d.tar.bz2 |
Improved the tests for ttk::style element create args
FossilOrigin-Name: bfadefe264ddefad522e3cb5e2e6431145428131
Diffstat (limited to 'tests/ttk')
-rw-r--r-- | tests/ttk/ttk.test | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/tests/ttk/ttk.test b/tests/ttk/ttk.test index cd3291b..fab6c2c 100644 --- a/tests/ttk/ttk.test +++ b/tests/ttk/ttk.test @@ -589,13 +589,13 @@ test ttk-14.3 "-textvariable in nonexistant namespace" -body { test ttk-15.1 "style element create: insufficient args" -body { ttk::style element create -} -returnCodes 1 -match glob -result "wrong # args:*" +} -returnCodes 1 -result "wrong # args: should be \"ttk::style element create name type ?options...?\"" test ttk-15.2 "style element create: insufficient args" -body { ttk::style element create plain.background -} -returnCodes 1 -match glob -result "wrong # args:*" +} -returnCodes 1 -result "wrong # args: should be \"ttk::style element create name type ?options...?\"" test ttk-15.3 "style element create: insufficient args" -body { ttk::style element create plain.background from -} -returnCodes 1 -match glob -result "wrong # args:*" +} -returnCodes 1 -result "wrong # args: should be \"theme ?element?\"" test ttk-15.4 "style element create: valid" -body { ttk::style element create plain.background from default } -returnCodes 0 -result "" |