diff options
-rw-r--r-- | tests/ChangeLog | 4 | ||||
-rwxr-xr-x | tests/lang-tcl | 3 |
2 files changed, 6 insertions, 1 deletions
diff --git a/tests/ChangeLog b/tests/ChangeLog index 7362181..a117c18 100644 --- a/tests/ChangeLog +++ b/tests/ChangeLog @@ -1,3 +1,7 @@ +2002-03-07 Bruno Haible <bruno@clisp.org> + + * lang-tcl: Skip the test if tcl exists but has no msgcat extension. + 2002-03-05 Bruno Haible <bruno@clisp.org> * xgettext-19: When skipping the test, use exit code 77. diff --git a/tests/lang-tcl b/tests/lang-tcl index 3179c62..dd3a9f3 100755 --- a/tests/lang-tcl +++ b/tests/lang-tcl @@ -63,9 +63,10 @@ test -d msgs || mkdir msgs : ${MSGFMT=msgfmt} ${MSGFMT} --tcl -d msgs -l fr fr.po || exit 1 -# Test for presence of tclsh. +# Test for presence of tclsh with msgcat extension. tmpfiles="$tmpfiles version.tcl" cat <<\EOF > version.tcl +package require msgcat puts $tcl_version EOF (tclsh version.tcl) >/dev/null 2>/dev/null \ |