This is no longer used anywhere, and even crashes if you try to call it.
Besides, OpenBSD::PackageRepository::Source was removed almost a year ago.
Index: PackageRepositoryList.pm
===================================================================
RCS file: /cvs/src/usr.sbin/pkg_add/OpenBSD/PackageRepositoryList.pm,v
retrieving revision 1.29
diff -u -p -d -r1.29 PackageRepositoryList.pm
--- PackageRepositoryList.pm 3 Feb 2015 10:26:29 -0000 1.29
+++ PackageRepositoryList.pm 23 Jun 2015 21:51:18 -0000
@@ -89,15 +89,4 @@ sub match_locations
return [];
}
-sub print_without_src
-{
- my $self = shift;
- my @l = ();
- for my $repo (@$self) {
- next if $repo->isa("OpenBSD::PackageRepository::Source");
- push(@l, $repo->url);
- }
- return join(':', @l);
-}
-
1;