Re: pkg_mgr not working

Hi,

On Fri, 14 Dec 2018 09:07:00 +0300
Максим wrote:

> Hello,
> In the OpenBSD current after the latest upgrade the package pkg_mgr
> doesn't work. When I run "pkg_mgr" it shows the following:
> DBD::SQLite::db selectall_arrayref failed: no such table: _Ports
> at /usr/local/libdata/perl5/site_perl/OpenBSD/PackageManager/DBIModel.pm
> line 144. DBD::SQLite::db selectcol_arrayref failed: no such table:
> _Paths
> at /usr/local/libdata/perl5/site_perl/OpenBSD/PackageManager/DBIModel.pm
> line 152. Can't use an undefined value as an ARRAY reference
> at /usr/local/libdata/perl5/site_perl/OpenBSD/PackageManager/DBIModel.pm
> line 153.
>

I can reproduce the issue. It appears that pkg_mgr uses the removed [1]
sqlports-compact.

I'm joining a diff that makes it working again here.

Charlène.

[1] https://marc.info/?l=openbsd-ports-cvs&m=154341707417775&w=2



Index: Makefile
===================================================================
RCS file: /cvs/ports/sysutils/pkg_mgr/Makefile,v
retrieving revision 1.14
diff -u -p -u -p -r1.14 Makefile
--- Makefile 28 Nov 2018 14:57:45 -0000 1.14
+++ Makefile 14 Dec 2018 09:51:39 -0000
@@ -4,7 +4,7 @@ COMMENT= user-friendly package browser a

DISTNAME= pkg_mgr-0.2.3
CATEGORIES= sysutils
-REVISION= 1
+REVISION= 2

HOMEPAGE= https://rhaalovely.net/pkg_mgr/
MAINTAINER= Landry Breuil <landry@openbsd.org>
Index: patches/patch-OpenBSD_PackageManager_DBIModel_pm
===================================================================
RCS file: /cvs/ports/sysutils/pkg_mgr/patches/patch-OpenBSD_PackageManager_DBIModel_pm,v
retrieving revision 1.2
diff -u -p -u -p -r1.2 patch-OpenBSD_PackageManager_DBIModel_pm
--- patches/patch-OpenBSD_PackageManager_DBIModel_pm 28 Nov 2018 14:57:45 -0000 1.2
+++ patches/patch-OpenBSD_PackageManager_DBIModel_pm 14 Dec 2018 09:51:39 -0000
@@ -7,7 +7,7 @@ Index: OpenBSD/PackageManager/DBIModel.p
$self->{portslist} = undef; # key=category id, value=port id array
$self->{dbh}->disconnect if defined $self->{dbh};
- $self->{dbh} = DBI->connect("dbi:SQLite:/usr/local/share/sqlports-compact");
-+ $self->{dbh} = DBI->connect("dbi:SQLite:${LOCALBASE}/share/sqlports-compact");
++ $self->{dbh} = DBI->connect("dbi:SQLite:${LOCALBASE}/share/sqlports");
$self->get_allports;
$self->update_installed;
}