summaryrefslogtreecommitdiffstats
path: root/tests
diff options
context:
space:
mode:
authordkf <donal.k.fellows@manchester.ac.uk>2012-07-04 07:09:40 (GMT)
committerdkf <donal.k.fellows@manchester.ac.uk>2012-07-04 07:09:40 (GMT)
commit9dee089fa2567d307056363c20eb69c53b4e1655 (patch)
treef601a0cf95af6e9aeea8f330063f37565515f418 /tests
parent6de91b6b7d469c5f8d511700b75689df23e43fd1 (diff)
parentd3104ac52bdca1849c62445954323c841fcd5009 (diff)
downloadtcl-9dee089fa2567d307056363c20eb69c53b4e1655.zip
tcl-9dee089fa2567d307056363c20eb69c53b4e1655.tar.gz
tcl-9dee089fa2567d307056363c20eb69c53b4e1655.tar.bz2
merge trunk
Diffstat (limited to 'tests')
-rw-r--r--tests/encoding.test8
-rw-r--r--tests/msgcat.test4
2 files changed, 10 insertions, 2 deletions
diff --git a/tests/encoding.test b/tests/encoding.test
index 51b7aa1..b4ee7c3 100644
--- a/tests/encoding.test
+++ b/tests/encoding.test
@@ -582,6 +582,14 @@ file delete {*}[glob -directory [temporaryDirectory] *.chars *.tcltestout]
# EscapeFreeProc, GetTableEncoding, unilen are fully tested by the rest of
# this file.
+
+test encoding-27.1 {encoding dirs basic behavior} -returnCodes error -body {
+ encoding dirs ? ?
+} -result {wrong # args: should be "encoding dirs ?dirList?"}
+test encoding-27.2 {encoding dirs basic behavior} -returnCodes error -body {
+ encoding dirs "\{not a list"
+} -result "expected directory list but got \"\{not a list\""
+
}
runtests
diff --git a/tests/msgcat.test b/tests/msgcat.test
index 6fe4b31..bbcd023 100644
--- a/tests/msgcat.test
+++ b/tests/msgcat.test
@@ -17,8 +17,8 @@ if {[catch {package require tcltest 2}]} {
puts stderr "Skipping tests in [info script]. tcltest 2 required."
return
}
-if {[catch {package require msgcat 1.4.4}]} {
- puts stderr "Skipping tests in [info script]. No msgcat 1.4.4 found to test."
+if {[catch {package require msgcat 1.4.5}]} {
+ puts stderr "Skipping tests in [info script]. No msgcat 1.4.5 found to test."
return
}