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 <lan...@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;
  }

Reply via email to