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 /src | |
| parent | 48ec19c9be186e4e0d21dc54a35e723b9f86b39f (diff) | |
| download | krb5-50e31578373ec329db77521bbc8750b3657c7957.zip krb5-50e31578373ec329db77521bbc8750b3657c7957.tar.gz krb5-50e31578373ec329db77521bbc8750b3657c7957.tar.bz2 | |
* 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
Diffstat (limited to 'src')
| -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 1da4206..273a2c2 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 f07b6f2..9d6cfc6 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 |