diff options
| author | Marc Espie <espie@cvs.openbsd.org> | 2008-06-27 10:57:28 +0000 |
|---|---|---|
| committer | Marc Espie <espie@cvs.openbsd.org> | 2008-06-27 10:57:28 +0000 |
| commit | 7dba7fa6d8b6d274d9704ec432ab1da2d045fbe7 (patch) | |
| tree | a357f7a93b04582db8fed8c8ebe7696d370f0b80 | |
| parent | dea5462cf723510acb9583980b330c563e9ac2c9 (diff) | |
synch with rest of work
| -rw-r--r-- | usr.sbin/pkg_add/OpenBSD/PackageRepository/SCP.pm | 15 |
1 files changed, 2 insertions, 13 deletions
diff --git a/usr.sbin/pkg_add/OpenBSD/PackageRepository/SCP.pm b/usr.sbin/pkg_add/OpenBSD/PackageRepository/SCP.pm index a20715856d8..4dbaaa118b7 100644 --- a/usr.sbin/pkg_add/OpenBSD/PackageRepository/SCP.pm +++ b/usr.sbin/pkg_add/OpenBSD/PackageRepository/SCP.pm @@ -1,5 +1,5 @@ # ex:ts=8 sw=4: -# $OpenBSD: SCP.pm,v 1.16 2007/06/16 09:29:37 espie Exp $ +# $OpenBSD: SCP.pm,v 1.17 2008/06/27 10:57:27 espie Exp $ # # Copyright (c) 2003-2006 Marc Espie <espie@openbsd.org> # @@ -105,17 +105,6 @@ sub grab_object } } -sub _new -{ - my ($class, $baseurl) = @_; - if ($baseurl =~ m/^\/\/(.*?)(\/.*)$/o) { - bless { host => $1, baseurl => $baseurl, - key => $1, path => $2 }, $class; - } else { - die "Invalid scp url: scp:$baseurl\n"; - } -} - sub maxcount { return 1; @@ -124,7 +113,7 @@ sub maxcount sub opened { my $self = $_[0]; - my $k = $self->{key}; + my $k = $self->{host}; if (!defined $distant{$k}) { $distant{$k} = []; } |