commit ee0b4f38296bffd4161dcd4b0c5f85b86bec8f15

Author: Igor Vlasenko <viy@altlinux.org>

Date:   Fri Jan 20 22:10:54 2017 +0200

    hack: throw away RPM::Database (TODO: rewrite)

diff --git a/Makefile.PL b/Makefile.PL

index a68ce0f..09aa29f 100644

--- a/Makefile.PL

+++ b/Makefile.PL

@@ -13,10 +13,10 @@ $cwd = cwd;

 %XS = qw(

          RPM.xs             RPM.c

          RPM/Constants.xs   RPM/Constants.c

-         RPM/Database.xs    RPM/Database.c

          RPM/Error.xs       RPM/Error.c

          RPM/Header.xs      RPM/Header.c

         );

+#         RPM/Database.xs    RPM/Database.c

 #         RPM/Package.xs     RPM/Package.c

 @OBJECT = values %XS;

diff --git a/RPM.pm b/RPM.pm

index ff91658..c3a2821 100644

--- a/RPM.pm

+++ b/RPM.pm

@@ -22,7 +22,7 @@ bootstrap RPM;

 # These are stubs into the sub-module bootstraps, hacked into RPM.xs

 bootstrap_Constants();

 bootstrap_Header();

-bootstrap_Database();

+#bootstrap_Database();

 bootstrap_Error();

 #bootstrap_Package($VERSION);

diff --git a/RPM.xs b/RPM.xs

index 20449cf..399a9a2 100644

--- a/RPM.xs

+++ b/RPM.xs

@@ -189,6 +189,6 @@ BOOT:

     newXS("RPM::bootstrap_Constants", boot_RPM__Constants, file);

     newXS("RPM::bootstrap_Header", boot_RPM__Header, file);

-    newXS("RPM::bootstrap_Database", boot_RPM__Database, file);

+//    newXS("RPM::bootstrap_Database", boot_RPM__Database, file);

     newXS("RPM::bootstrap_Error", boot_RPM__Error, file);

 }

diff --git a/t/00_load.t b/t/00_load.t

index 3d1743a..eda88ae 100755

--- a/t/00_load.t

+++ b/t/00_load.t

@@ -1,8 +1,8 @@

 #!/usr/bin/perl

 # Verify that the individual modules will load

-

-@MODULES = qw(RPM RPM::Constants RPM::Database RPM::Header RPM::Error);

+# RPM::Database

+@MODULES = qw(RPM RPM::Constants RPM::Header RPM::Error);

 printf "1..%d\n", scalar(@MODULES);