From 06dd22af9d448b1590e12f92d2b6bb642678be71 Mon Sep 17 00:00:00 2001
From: Ansgar Becker <ansgarbecker@users.noreply.github.com>
Date: Tue, 23 Feb 2010 18:21:43 +0000
Subject: [PATCH] Again, increase length of fetched SQL column from 10kb to
 50kb, so it's less likely that we cut important queries. Fixes issue #1714.

---
 source/main.pas | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/source/main.pas b/source/main.pas
index b7990f3b..e6073e97 100644
--- a/source/main.pas
+++ b/source/main.pas
@@ -7918,7 +7918,7 @@ var
   Sel: TStringList;
   Text: String;
 const
-  InfoLen = SIZE_KB*10;
+  InfoLen = SIZE_KB*50;
 begin
   // Display client threads
   vt := Sender as TVirtualStringTree;