Re: PATCH: Download sometimes fails to find exec file (REPOST)

[Fernando Nasser <fnasser at cygnus dot com>]

This is the correct one.  Thanks Syd.

-- 
Fernando Nasser
Red Hat - Toronto                       E-Mail:  fnasser@redhat.com
2323 Yonge Street, Suite #300
Toronto, Ontario   M4P 2C9


*** download.itb        Wed Oct  4 17:12:26 2000
--- download.itb        Wed Oct  4 16:25:43 2000
***************
*** 147,152 ****
--- 147,153 ----
    global gdb_exe_name gdb_downloading gdb_loaded
    global gdb_target_name gdb_pretty_name
    global gdb_running
+   global tcl_platform
    
    debug "exe=$gdb_exe_name downloading=$gdb_downloading"
    debug "    loaded=$gdb_loaded target=$gdb_target_name running=$gdb_running"
***************
*** 185,191 ****
      }
    }
    
!   if {! [file exists $gdb_exe_name]} {
      tk_messageBox -icon error -title GDB -type ok -modal task\
        -message "Request to download non-existent executable $gdb_exe_name"
      set gdb_downloading 0
--- 186,197 ----
      }
    }
    
!   if {[string compare $tcl_platform(platform) "windows"] == 0} {
!     set f [ide_cygwin_path to_win32 $gdb_exe_name]
!   } else {
!     set f $gdb_exe_name
!   }
!   if {! [file exists $f]} {
      tk_messageBox -icon error -title GDB -type ok -modal task\
        -message "Request to download non-existent executable $gdb_exe_name"
      set gdb_downloading 0