Hi, Arnaud needs to access to the status of the bug reports having a given usertag (for his SoC project). Thus I wrote one more SOAP module. Please find attached Status.pm which have to go in Debbugs/SOAP/ and an updated cpi/soap.cgi (added: new module / require "./common.pl").
I'd appreciate if you could integrate that in bugs.donarmstrong.com quickly so that he can test his project with your BTS. For the future, maybe we can merge some SOAP modules... one function per module looks like strange. :) Cheers, -- Raphaël Hertzog Premier livre français sur Debian GNU/Linux : http://www.ouaza.com/livre/admin-debian/
package Debbugs::SOAP::Status; sub get_status { my ($class, @bugs) = @_; my %s; foreach (@bugs) { my $hash = debbugs::getbugstatus($_); if (scalar(%{$hash}) > 0) { $s{$_} = $hash; } } return \%s; } 1;
#!/usr/bin/perl -wT package debbugs; use SOAP::Transport::HTTP; BEGIN { # Needed so that other modules have access to the variables # when included with use require '/etc/debbugs/config'; } require './common.pl'; use Debbugs::SOAP::Usertag; use Debbugs::SOAP::Status; SOAP::Transport::HTTP::CGI -> dispatch_to('Debbugs::SOAP::Usertag', 'Debbugs::SOAP::Status') -> handle;