* 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

diff --git a/src/lib/rpc/unit-test/ChangeLog b/src/lib/rpc/unit-test/ChangeLog
index 1da42068cd25e6b55b7e7f6c8acf102fd0ec9a60..273a2c26d2697b58762691010ceda56264523c95 100644 (file)
--- 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 f07b6f27a81350a5c352788cf7ff678b8b3b1a1b..9d6cfc69c81ff5fe439e43cee542663c7a0eab96 100644 (file)
--- 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