diff options
| author | Marc Espie <espie@cvs.openbsd.org> | 2004-01-27 00:14:43 +0000 |
|---|---|---|
| committer | Marc Espie <espie@cvs.openbsd.org> | 2004-01-27 00:14:43 +0000 |
| commit | f0ce708080420bf22b2426e1560f7ba88e28e95c (patch) | |
| tree | c39b18002f481d5b8fdf9f6e7edc6cd2f8815f68 /usr.sbin | |
| parent | d1b5523ff002165e10c57e4850ae33cc5caaa554 (diff) | |
die $!
Diffstat (limited to 'usr.sbin')
| -rw-r--r-- | usr.sbin/pkg_add/OpenBSD/PackageInfo.pm | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/usr.sbin/pkg_add/OpenBSD/PackageInfo.pm b/usr.sbin/pkg_add/OpenBSD/PackageInfo.pm index ed3f1a52a1c..ae99bf292bd 100644 --- a/usr.sbin/pkg_add/OpenBSD/PackageInfo.pm +++ b/usr.sbin/pkg_add/OpenBSD/PackageInfo.pm @@ -1,4 +1,4 @@ -# $OpenBSD: PackageInfo.pm,v 1.4 2003/12/09 19:22:36 espie Exp $ +# $OpenBSD: PackageInfo.pm,v 1.5 2004/01/27 00:14:42 espie Exp $ # # Copyright (c) 2003 Marc Espie. # @@ -82,7 +82,7 @@ sub installed_packages() if (!defined $list) { $list = {}; - opendir(my $dir, $pkg_db) or die "Bad pkg_db"; + opendir(my $dir, $pkg_db) or die "Bad pkg_db: $!"; while (my $e = readdir($dir)) { next if $e eq '.' or $e eq '..'; next unless -d "$pkg_db/$e"; |