From 50e31578373ec329db77521bbc8750b3657c7957 Mon Sep 17 00:00:00 2001 From: Ken Raeburn Date: Mon, 16 Sep 2002 03:35:41 +0000 Subject: [PATCH] * lib/helpers.exp (setup_database): Use "!=" instead of "ne" for string comparisons git-svn-id: svn://anonsvn.mit.edu/krb5/trunk@14870 dc483132-0cff-0310-8789-dd5450dbe970 --- src/lib/rpc/unit-test/ChangeLog | 5 +++++ src/lib/rpc/unit-test/lib/helpers.exp | 2 +- 2 files changed, 6 insertions(+), 1 deletion(-) diff --git a/src/lib/rpc/unit-test/ChangeLog b/src/lib/rpc/unit-test/ChangeLog index 1da42068c..273a2c26d 100644 --- a/src/lib/rpc/unit-test/ChangeLog +++ b/src/lib/rpc/unit-test/ChangeLog @@ -1,3 +1,8 @@ +2002-09-15 Ken Raeburn + + * lib/helpers.exp (setup_database): Use "!=" instead of "ne" for + string comparisons. + 2002-09-15 Tom Yu * lib/helpers.exp (expect_tcl_prompt): Use the "-re" flag, and diff --git a/src/lib/rpc/unit-test/lib/helpers.exp b/src/lib/rpc/unit-test/lib/helpers.exp index f07b6f27a..9d6cfc69c 100644 --- a/src/lib/rpc/unit-test/lib/helpers.exp +++ b/src/lib/rpc/unit-test/lib/helpers.exp @@ -79,7 +79,7 @@ proc setup_database {} { expect_tcl_prompt # tcl 8.4 for some reason screws up autodetection of output EOL # translation. Work around it for now. - send_tcl_cmd_await_echo "if { \[info commands fconfigure\] ne \"\" } { fconfigure stdout -translation lf }" + send_tcl_cmd_await_echo "if { \[info commands fconfigure\] != \"\" } { fconfigure stdout -translation lf }" expect_tcl_prompt send_tcl_cmd_await_echo "source {$TCLUTIL}" expect_tcl_prompt -- 2.26.2