Description: drop PostGreSQL support
 PostGreSQL links with OpenSSL, incompatible with the GPL license.
 .
 Let gnatcoll_db2ada use SQLite instead.
Author: Nicolas Boulenguez <nicolas@debian.org>
Forwarded: no

--- a/src/tools/gnatcoll_db2ada.adb
+++ b/src/tools/gnatcoll_db2ada.adb
@@ -36,7 +36,6 @@
 with GNATCOLL.Arg_Lists;         use GNATCOLL.Arg_Lists;
 with GNATCOLL.SQL.Exec;          use GNATCOLL.SQL, GNATCOLL.SQL.Exec;
 with GNATCOLL.SQL.Inspect;       use GNATCOLL.SQL.Inspect;
-with GNATCOLL.SQL.Postgres;
 with GNATCOLL.SQL.Sqlite;
 with GNATCOLL.Traces;
 with GNATCOLL.Utils;             use GNATCOLL.Utils;
@@ -129,7 +128,7 @@
    --  Print the help and exit the application
 
    procedure Main;
-   --  Get the list of parameters to use to connect to the postgres database
+   --  Get the list of parameters to use to connect to the database
 
    procedure Dump_Tables
      (Connection : access Database_Connection_Record'Class;
@@ -282,7 +281,7 @@
       Put_Line ("-dbpasswd <passwd>: password for the database");
       Put_Line ("-dbport <port>: port for the database");
       Put_Line ("-dbtype <type>: database backend to use"
-                & " (default is postgreSQL)");
+                & " (default is SQLite)");
       New_Line;
       Put_Line ("==== Specifying output");
       Put_Line ("The default output is a set of Ada files that represent the");
@@ -336,7 +335,7 @@
       DB_User   : GNAT.OS_Lib.String_Access := new String'("");
       DB_Passwd : GNAT.OS_Lib.String_Access := new String'("");
       DB_Port   : Integer := -1;
-      DB_Type   : GNAT.OS_Lib.String_Access := new String'("postgresql");
+      DB_Type   : GNAT.OS_Lib.String_Access := new String'("sqlite");
 
       Enums, Vars : String_Lists.List;
       --  The internal index corresponding to each table. This is used to
@@ -463,13 +462,9 @@
          --  This might be to read the schema, or to create the database
 
          if DB_Type.all = "postgresql" then
-            Descr := GNATCOLL.SQL.Postgres.Setup
-              (Database      => DB_Name.all,
-               User          => DB_User.all,
-               Host          => DB_Host.all,
-               Password      => DB_Passwd.all,
-               Port          => DB_Port,
-               Cache_Support => False);
+            Ada.Text_IO.Put_Line
+              ("PostGreSQL disabled, "
+                 & "see /usr/share/doc/libgnatcoll*-dev/README.Debian.");
          elsif DB_Type.all = "sqlite" then
             Descr := GNATCOLL.SQL.Sqlite.Setup
               (Database      => DB_Name.all,
--- a/src/gnatcoll_tools.gpr
+++ b/src/gnatcoll_tools.gpr
@@ -1,5 +1,4 @@
 with "../gnatcoll_shared";
-with "gnatcoll_postgres";
 with "gnatcoll_sqlite";
 with "gnatcoll_readline";
 with "gnatcoll_iconv";
