fix for help with mingw build

fix for help with mingw build

[Dave Poston]

[-- Attachment #1: Type: text/plain, Size: 509 bytes --]

Hi,

      Insight 6.8 built under mingw fires an 'unknown command
ide_shell_execute' if you try to use help.

      Attached is a fix for this, registration of ide_shell_execute needs
to happen under mingw as well as cygwin.

      Also the ide_shell_execute command with 'open' as its operation
didn't work for me, whereas using "" (default action, equivalent to
double-clicking the file) did.

      I'm new to this business of sending patches around, let me know if
I've got anything wrong!

Dave









[-- Attachment #2: diff.txt --]
[-- Type: text/plain, Size: 1199 bytes --]

diff -Nurb insight-6.8-orig/insight-6.8/gdb/gdbtk/generic/gdbtk.c insight-6.8/insight-6.8/gdb/gdbtk/generic/gdbtk.c
--- insight-6.8-orig/insight-6.8/gdb/gdbtk/generic/gdbtk.c	Mon Mar  3 23:25:04 2008
+++ insight-6.8/insight-6.8/gdb/gdbtk/generic/gdbtk.c	Tue Oct  7 18:21:23 2008
@@ -537,9 +537,13 @@
   /* Path conversion functions.  */
   if (ide_create_cygwin_path_command (gdbtk_interp) != TCL_OK)
     error ("cygwin path command initialization failed");
+#endif
+
+#ifdef __WIN32__
   if (ide_create_shell_execute_command (gdbtk_interp) != TCL_OK)
     error ("cygwin shell execute command initialization failed");
 #endif
+
 
   /* Only for testing -- and only when it can't be done any
      other way. */
diff -Nurb insight-6.8-orig/insight-6.8/gdb/gdbtk/library/helpviewer.tcl insight-6.8/insight-6.8/gdb/gdbtk/library/helpviewer.tcl
--- insight-6.8-orig/insight-6.8/gdb/gdbtk/library/helpviewer.tcl	Sat Feb  9 01:23:42 2008
+++ insight-6.8/insight-6.8/gdb/gdbtk/library/helpviewer.tcl	Wed Oct  8 13:05:24 2008
@@ -25,7 +25,7 @@
 
   # windows is easy
   if {$::gdbtk_platform(platform) == "windows"} {
-    ide_shell_execute open $link
+    ide_shell_execute "" $link
     return
   }