From 28e396ad173a907b3199bf017c4e7fb407ed7c6b Mon Sep 17 00:00:00 2001 From: Don Armstrong Date: Mon, 25 Feb 2008 13:56:05 -0800 Subject: [PATCH] * Fix paramaters for get_versions and source/binary SOAP calls --- Debbugs/SOAP.pm | 9 ++++++--- 1 file changed, 6 insertions(+), 3 deletions(-) diff --git a/Debbugs/SOAP.pm b/Debbugs/SOAP.pm index 1006ff8..ed66b18 100644 --- a/Debbugs/SOAP.pm +++ b/Debbugs/SOAP.pm @@ -274,8 +274,9 @@ versions for all architectures, with any duplicates removed. sub binary_to_source{ my $VERSION = __populate_version(pop); + my ($self,@params) = @_; - return [binarytosource(@_)]; + return [binarytosource(@params)]; } =head2 source_to_binary @@ -294,8 +295,9 @@ architecture is not returned. sub source_to_binary { my $VERSION = __populate_version(pop); + my ($self,@params) = @_; - return [source_to_binary(@_)]; + return [source_to_binary(@params)]; } =head2 get_versions @@ -338,8 +340,9 @@ This function correponds to L sub get_versions{ my $VERSION = __populate_version(pop); + my ($self,@params) = @_; - return scalar Debbugs::Packages::get_versions(@_); + return scalar Debbugs::Packages::get_versions(@params); } =head1 VERSION COMPATIBILITY -- 2.39.2