From: Kevin Buettner <kevinb@redhat.com>
Date: Wed, 30 May 2001 02:54:41 +0000 (+0000)
Subject: 	* gdb.base/completion.exp (INPUTRC): Set this environment variable
X-Git-Url: http://drtracing.org/?a=commitdiff_plain;h=5ea2a32c884a33f3707e03f09bec8b75b37d7877;p=deliverable%2Fbinutils-gdb.git

	* gdb.base/completion.exp (INPUTRC): Set this environment variable
	to a known value in order to get consistent results regardless
	of the setting of INPUTRC or the presence or contents of .inputrc.
---

diff --git a/gdb/testsuite/ChangeLog b/gdb/testsuite/ChangeLog
index 133ffef971..58f44a1469 100644
--- a/gdb/testsuite/ChangeLog
+++ b/gdb/testsuite/ChangeLog
@@ -1,3 +1,9 @@
+2001-05-29  Kevin Buettner  <kevinb@redhat.com>
+
+	* gdb.base/completion.exp (INPUTRC): Set this environment variable
+	to a known value in order to get consistent results regardless
+	of the setting of INPUTRC or the presence or contents of .inputrc.
+
 2001-05-24  Michael Snyder  <msnyder@redhat.com>
 
 	* gdb.threads/linux-dp.exp: Remove assumptions about thread ordering.
diff --git a/gdb/testsuite/gdb.base/completion.exp b/gdb/testsuite/gdb.base/completion.exp
index 9fa44c08dd..8c8f676d8d 100644
--- a/gdb/testsuite/gdb.base/completion.exp
+++ b/gdb/testsuite/gdb.base/completion.exp
@@ -72,6 +72,19 @@ if [get_compiler_info ${binfile}] {
 }
 
 gdb_exit
+
+# Don't let a .inputrc file or an existing setting of INPUTRC mess up
+# the test results.  Even if /dev/null doesn't exist on the particular
+# platform, the readline library will use the default setting just by
+# failing to open the file.  OTOH, opening /dev/null successfully will
+# also result in the default settings being used since nothing will be
+# read from this file.
+global env
+if [info exists env(INPUTRC)] {
+    set old_inputrc $env(INPUTRC)
+}
+set env(INPUTRC) "/dev/null"
+
 gdb_start
 gdb_reinitialize_dir $srcdir/$subdir
 gdb_load ${binfile}
@@ -596,19 +609,12 @@ gdb_expect  {
         timeout         { fail "(timeout) complete 'set follow-fork-mode'" }
         }
 
+# Restore globals modified in this test...
+if [info exists old_inputrc] {
+    set env(INPUTRC) $old_inputrc
+} else {
+    unset env(INPUTRC)
+}
 set timeout $oldtimeout1
-return 0
-
-
-
-
-
-
-
-
-
-
-
-
-
 
+return 0