[tuxdroid-svn] r5179 - software_suite_v3/software/tool/tux_droid_browser/windows/trunk/tux_droid_browser

[jerome <c2m...@c2...>]

Author: jerome
Date: 2009-07-28 10:04:20 +0200 (Tue, 28 Jul 2009)
New Revision: 5179

Modified:
   software_suite_v3/software/tool/tux_droid_browser/windows/trunk/tux_droid_browser/TuxUtils.dcu
   software_suite_v3/software/tool/tux_droid_browser/windows/trunk/tux_droid_browser/TuxUtils.pas
   software_suite_v3/software/tool/tux_droid_browser/windows/trunk/tux_droid_browser/Unit1.dcu
Log:
* Fixed a bug quitting TuxBox 2.0 when Tux Droid server was not started.

Modified: software_suite_v3/software/tool/tux_droid_browser/windows/trunk/tux_droid_browser/TuxUtils.dcu
===================================================================
(Binary files differ)

Modified: software_suite_v3/software/tool/tux_droid_browser/windows/trunk/tux_droid_browser/TuxUtils.pas
===================================================================
--- software_suite_v3/software/tool/tux_droid_browser/windows/trunk/tux_droid_browser/TuxUtils.pas	2009-07-28 07:52:26 UTC (rev 5178)
+++ software_suite_v3/software/tool/tux_droid_browser/windows/trunk/tux_droid_browser/TuxUtils.pas	2009-07-28 08:04:20 UTC (rev 5179)
@@ -298,8 +298,15 @@
 var
   request_result : string;
 begin
-  request_result := TuxUtils.DownloadHTTP(command_stop);
-  result := TuxUtils.getResult(request_result);
+  if TuxUtils.isTuxDroidServerStarted then
+    begin
+      request_result := TuxUtils.DownloadHTTP(command_stop);
+      result := TuxUtils.getResult(request_result);
+    end
+  else
+    begin
+      result := true;
+    end;
 end;
 
 

Modified: software_suite_v3/software/tool/tux_droid_browser/windows/trunk/tux_droid_browser/Unit1.dcu
===================================================================
(Binary files differ)