diff options
| author | Ken Raeburn <raeburn@mit.edu> | 2002-09-16 03:35:41 +0000 |
|---|---|---|
| committer | Ken Raeburn <raeburn@mit.edu> | 2002-09-16 03:35:41 +0000 |
| commit | 50e31578373ec329db77521bbc8750b3657c7957 (patch) | |
| tree | 5468845cfc87d537add1cc2ee2622ca144895099 | |
| parent | 48ec19c9be186e4e0d21dc54a35e723b9f86b39f (diff) | |
| download | krb5-50e31578373ec329db77521bbc8750b3657c7957.tar.gz krb5-50e31578373ec329db77521bbc8750b3657c7957.tar.xz krb5-50e31578373ec329db77521bbc8750b3657c7957.zip | |
* 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
| -rw-r--r-- | src/lib/rpc/unit-test/ChangeLog | 5 | ||||
| -rw-r--r-- | src/lib/rpc/unit-test/lib/helpers.exp | 2 |
2 files changed, 6 insertions, 1 deletions
diff --git a/src/lib/rpc/unit-test/ChangeLog b/src/lib/rpc/unit-test/ChangeLog index 1da42068cd..273a2c26d2 100644 --- a/src/lib/rpc/unit-test/ChangeLog +++ b/src/lib/rpc/unit-test/ChangeLog @@ -1,3 +1,8 @@ +2002-09-15 Ken Raeburn <raeburn@mit.edu> + + * lib/helpers.exp (setup_database): Use "!=" instead of "ne" for + string comparisons. + 2002-09-15 Tom Yu <tlyu@mit.edu> * 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 f07b6f27a8..9d6cfc69c8 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 |