diff options
author | 2004-01-27 00:14:42 +0000 | |
---|---|---|
committer | 2004-01-27 00:14:42 +0000 | |
commit | ad6ad10742e576a026a4315796c917c18c80b8d5 (patch) | |
tree | c04e50c284bb5fe01bf74f92118ad622ed665bf7 | |
parent | show $! in system related errors. (diff) | |
download | wireguard-openbsd-ad6ad10742e576a026a4315796c917c18c80b8d5.tar.xz wireguard-openbsd-ad6ad10742e576a026a4315796c917c18c80b8d5.zip |
die $!
-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"; |