From mboxrd@z Thu Jan 1 00:00:00 1970 From: Syd Polk To: Fernando Nasser Cc: insight@sourceware.cygnus.com Subject: Re: PATCH: Download sometimes fails to find exec file (REPOST) Date: Wed, 04 Oct 2000 14:21:00 -0000 Message-id: <4.2.0.58.20001004142316.00dbe100@pop.cygnus.com> References: <4.2.0.58.20001004125347.00dc1b00@pop.cygnus.com> <4.2.0.58.20001004133433.00db8880@pop.cygnus.com> <39DB9E57.AE4007C3@cygnus.com> X-SW-Source: 2000-q4/msg00022.html Approved. At 05:17 PM 10/4/00 -0400, Fernando Nasser wrote: >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 Syd Polk spolk@redhat.com Engineering Manager +1 415 777 9810 x 241 Red Hat, Inc.