* gdbtk.tcl (build_framework): Add "Report bug" to help menu.

diff --git a/gdb/ChangeLog b/gdb/ChangeLog
index f984be6527c1c697176336461fdd3518de557e63..8c57e475854559f66596d35d10633a1685c4bdf4 100644 (file)
--- 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 a492a627b72d67c5da878fe714688ca4da271aa7..0fb38d9041f08071d25639326c22575a7058025e 100644 (file)
--- 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