From: Stu Grossman <grossman@cygnus>
Date: Tue, 24 Jan 1995 01:23:18 +0000 (+0000)
Subject: 	* gdbtk.tcl:  Take .gdbtkinit if it exists.  Makes gdbtk match the
X-Git-Url: https://git.libre-soc.org/?a=commitdiff_plain;h=6bd7d9fad81197f4ba10168f03fe09a1a9cd3b1f;p=binutils-gdb.git

	* gdbtk.tcl:  Take .gdbtkinit if it exists.  Makes gdbtk match the
	doc!
---

diff --git a/gdb/ChangeLog b/gdb/ChangeLog
index a6730c07f0b..f597b646997 100644
--- a/gdb/ChangeLog
+++ b/gdb/ChangeLog
@@ -1,3 +1,8 @@
+Mon Jan 23 17:21:09 1995  Stu Grossman  (grossman@cygnus.com)
+
+	* gdbtk.tcl:  Take .gdbtkinit if it exists.  Makes gdbtk match the
+	doc!
+
 Mon Jan 23 13:11:46 1995  Per Bothner  <bothner@kalessin.cygnus.com>
 
 	Add support for Chill bitstring literals (e.h. H'FF00').
diff --git a/gdb/gdbtk.tcl b/gdb/gdbtk.tcl
index 74bd7e957ff..2a16424c48d 100644
--- a/gdb/gdbtk.tcl
+++ b/gdb/gdbtk.tcl
@@ -2672,4 +2672,8 @@ destroy .t
 pack .c.m
 bind .c.m <Leave> {destroy .c}
 
+if [file exists ~/.gdbtkinit] {
+	source ~/.gdbtkinit
+}
+
 update