From c981300c380ac3a492771e444fb8b519ec5714a3 Mon Sep 17 00:00:00 2001
From: Stu Grossman <grossman@cygnus>
Date: Mon, 28 Nov 1994 18:01:31 +0000
Subject: [PATCH] 	* gdbtk.tcl (build_framework):  Add "Report bug" to
 help menu.

---
 gdb/ChangeLog | 2 ++
 gdb/gdbtk.tcl | 2 ++
 2 files changed, 4 insertions(+)

diff --git a/gdb/ChangeLog b/gdb/ChangeLog
index f984be6527c..8c57e475854 100644
--- a/gdb/ChangeLog
+++ b/gdb/ChangeLog
@@ -1,5 +1,7 @@
 Mon Nov 28 09:17:20 1994  Stu Grossman  (grossman@cygnus.com)
 
+	* gdbtk.tcl (build_framework):  Add "Report bug" to help menu.
+
 	* gdbtk.tcl:  Re-arrange windows using new, consistent layout. Clean
 	up lots of code and centralize framework initialization.
 
diff --git a/gdb/gdbtk.tcl b/gdb/gdbtk.tcl
index a492a627b72..0fb38d9041f 100644
--- a/gdb/gdbtk.tcl
+++ b/gdb/gdbtk.tcl
@@ -1364,6 +1364,8 @@ proc build_framework {win {title GDBtk} {label {}}} {
 		-command {echo "with GDBtk"}
 	${win}.menubar.help.menu add command -label "with this window" \
 		-command {echo "with this window"}
+	${win}.menubar.help.menu add command -label "Report bug" \
+		-command {exec send-pr}
 
 	tk_menuBar ${win}.menubar ${win}.menubar.file ${win}.menubar.view \
 		${win}.menubar.window ${win}.menubar.help
-- 
2.30.2