""

plugins/Tk-GUI/Tk/Browser.pm

@@ -133,11 +133,11 @@ sub a_begin
 		{
                     eval 'use Win32::Process; use Win32; ' .
                         'my ($obj, $cmd);' .
-                        '$cmd = ' . "'" . 'C:\Program Files\Internet Explorer\iexplore.exe' . "';" .
+                        '$cmd = ' . "'" . 'C:\Progra~1\Intern~1\iexplore.exe' . "';" .
                         'Win32::Process::Create($obj, "$cmd", "$cmd $_[1]", 0, 32, abs_path) or '.
-                        'die Win32::FormatMessage( Win32::GetLastError() );' 
-                        or die "$@ $!";
-		}
+                        'die "eerr" . Win32::FormatMessage( Win32::GetLastError() );';
+                    warn "$@ $!" if $@;
+           	}
 	}, $href]);
 
 	$self->tagBind($tag, '<Enter>', [sub {