From f870c81770bdffef02d07965fc4cdc6c8481352d Mon Sep 17 00:00:00 2001
From: Ansgar Becker <anse@heidisql.com>
Date: Tue, 16 Apr 2019 06:32:27 +0200
Subject: [PATCH] Issue #521: increase waiting time after PLink output, from 1s
 to 2s, for slow connections.

---
 source/dbconnection.pas | 10 +++++-----
 1 file changed, 5 insertions(+), 5 deletions(-)

diff --git a/source/dbconnection.pas b/source/dbconnection.pas
index 2438ce4b..77686e83 100644
--- a/source/dbconnection.pas
+++ b/source/dbconnection.pas
@@ -928,10 +928,10 @@ begin
 
     OutText := Trim(ReadPipe(FOutPipe));
     ErrorText := ReadPipe(FErrorPipe);
-    if (OutText <> '') or (ErrorText <> '') then
+    if (OutText <> '') or (ErrorText <> '') then begin
       ReturnedSomethingAt := Waited;
-
-    FConnection.Log(lcDebug, 'plink OutText:'+OutText+' ErrorText:'+ErrorText);
+      FConnection.Log(lcDebug, 'PLink OutText: "'+OutText+'"  ErrorText: "'+ErrorText+'"');
+    end;
 
     if OutText <> '' then begin
       if ExecRegExpr('login as\s*\:', OutText) then begin
@@ -975,8 +975,8 @@ begin
       end;
     end;
 
-    // Exit loop after 1s idletime when there was output earlier
-    if (ReturnedSomethingAt > 0) and (Waited >= ReturnedSomethingAt+1000) then
+    // Exit loop after 2s idletime when there was output earlier
+    if (ReturnedSomethingAt > 0) and (Waited >= ReturnedSomethingAt+2000) then
       Break;
     
     Application.ProcessMessages;