From: Don Armstrong <don@donarmstrong.com>
Date: Mon, 27 Aug 2007 06:43:15 +0000 (-0700)
Subject: fix bug selection for broken soap clients
X-Git-Tag: release/2.6.0~518^2~3
X-Git-Url: https://git.donarmstrong.com/?a=commitdiff_plain;h=b19d285d86390f367d7263c7bc1ec620565f451e;p=debbugs.git

fix bug selection for broken soap clients
---

diff --git a/Debbugs/SOAP.pm b/Debbugs/SOAP.pm
index ed7b274f..9b14575c 100644
--- a/Debbugs/SOAP.pm
+++ b/Debbugs/SOAP.pm
@@ -100,10 +100,10 @@ second the bug, dist, arch, bugusertags, sourceversions, and version
 parameters are passed if they are present.
 
 As a special case for suboptimal SOAP implementations, if only one
-argument is passed to get_status and it is an arrayref which either
-has a number as the first element or also contains an arrayref as the
-first element, the outer arrayref is dereferenced, and processed as
-in the examples above.
+argument is passed to get_status and it is an arrayref which either is
+empty, has a number as the first element, or contains an arrayref as
+the first element, the outer arrayref is dereferenced, and processed
+as in the examples above.
 
 See L<Debbugs::Status::get_bug_status> for details.
 
@@ -115,8 +115,9 @@ sub get_status {
 
      if (@bugs == 1 and
 	 ref($bugs[0]) and
-	 @{$bugs[0]} and
-	 (ref($bugs[0][0]) or
+	 @{$bugs[0]} <= 1 and
+	 (@{$bugs[0]} == 0 or
+	  ref($bugs[0][0]) or
 	  looks_like_number($bugs[0][0])
 	 )
 	) {