From 9acc474e9aeb039f59680a641e4b81a5302a941e Mon Sep 17 00:00:00 2001
From: Ansgar Becker <ansgarbecker@users.noreply.github.com>
Date: Wed, 26 Jun 2013 04:24:51 +0000
Subject: [PATCH] Issue #3212: Consider schema name in default objects sorting,
 so the tree displays the same order as we have in the database tab when
 sorted by "Name" column.

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

diff --git a/source/dbconnection.pas b/source/dbconnection.pas
index 14c75cf3..964d3521 100644
--- a/source/dbconnection.pas
+++ b/source/dbconnection.pas
@@ -4957,7 +4957,7 @@ end;
 function TDBObjectComparer.Compare(const Left, Right: TDBObject): Integer;
 begin
   // Simple sort method for a TDBObjectList
-  Result := CompareAnyNode(Left.Name, Right.Name);
+  Result := CompareAnyNode(Left.Schema+'.'+Left.Name, Right.Schema+'.'+Right.Name);
 end;