diff options
author | Marc Espie <espie@cvs.openbsd.org> | 2004-11-12 22:39:41 +0000 |
---|---|---|
committer | Marc Espie <espie@cvs.openbsd.org> | 2004-11-12 22:39:41 +0000 |
commit | 3089137f0a9cbb0d791fc04b04a831abc585978c (patch) | |
tree | 5d57a53fac7c0756d29e4c51241bcd9073fbe09e | |
parent | 197945d1c30d7875063e69c1e15bf2837930adf6 (diff) |
do catfile manually, e.g., avoid several calls to canonpath.
-rw-r--r-- | usr.sbin/pkg_add/OpenBSD/PackingElement.pm | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/usr.sbin/pkg_add/OpenBSD/PackingElement.pm b/usr.sbin/pkg_add/OpenBSD/PackingElement.pm index a275c3d5d71..1d1f44d0f22 100644 --- a/usr.sbin/pkg_add/OpenBSD/PackingElement.pm +++ b/usr.sbin/pkg_add/OpenBSD/PackingElement.pm @@ -1,5 +1,5 @@ # ex:ts=8 sw=4: -# $OpenBSD: PackingElement.pm,v 1.64 2004/11/12 19:42:01 espie Exp $ +# $OpenBSD: PackingElement.pm,v 1.65 2004/11/12 22:39:40 espie Exp $ # # Copyright (c) 2003-2004 Marc Espie <espie@openbsd.org> # @@ -161,7 +161,7 @@ sub compute_fullname die "Absolute name forbidden: $fullname"; } } else { - $fullname = File::Spec->catfile($state->{cwd}, $fullname); + $fullname = $self->{cwd}."/".$fullname; } $fullname = File::Spec->canonpath($fullname); $self->{fullname} = $fullname; |