From 6e77819495377f12d5b365a15ee1e39c3314c65c Mon Sep 17 00:00:00 2001
From: Martin Hunt <hunt@redhat.com>
Date: Fri, 24 Jul 1998 08:09:03 +0000
Subject: [PATCH] Fri Jul 24 01:08:37 1998 Martin M. Hunt <hunt@cygnus.com>
* gdbtk-cmds.c (gdb_loadfile): When there are no
linenumbers, use only one tab.
---
gdb/ChangeLog-gdbtk | 5 +++++
gdb/gdbtk-cmds.c | 4 ++--
2 files changed, 7 insertions(+), 2 deletions(-)
diff --git a/gdb/ChangeLog-gdbtk b/gdb/ChangeLog-gdbtk
index 88f22f93e43..37578157f1a 100644
--- a/gdb/ChangeLog-gdbtk
+++ b/gdb/ChangeLog-gdbtk
@@ -1,3 +1,8 @@
+Fri Jul 24 01:08:37 1998 Martin M. Hunt <hunt@cygnus.com>
+
+ * gdbtk-cmds.c (gdb_loadfile): When there are no
+ linenumbers, use only one tab.
+
Sat Jul 18 12:28:39 1998 Martin M. Hunt <hunt@cygnus.com>
* gdbtk.c (gdbtk_cleanup): Add call to tcl function
diff --git a/gdb/gdbtk-cmds.c b/gdb/gdbtk-cmds.c
index 4a7cd6f3a7c..cb98e5ca344 100644
--- a/gdb/gdbtk-cmds.c
+++ b/gdb/gdbtk-cmds.c
@@ -2686,9 +2686,9 @@ gdb_loadfile (clientData, interp, objc, objv)
}
else
{
- Tcl_DStringAppend (&text_cmd_1, " insert end {-\t} break_tag", -1);
+ Tcl_DStringAppend (&text_cmd_1, " insert end {- } break_tag", -1);
prefix_len_1 = Tcl_DStringLength(&text_cmd_1);
- Tcl_DStringAppend (&text_cmd_2, " insert end { \t} \"\"", -1);
+ Tcl_DStringAppend (&text_cmd_2, " insert end { } \"\"", -1);
prefix_len_2 = Tcl_DStringLength(&text_cmd_2);