Bug 829273: Certain webservice tests failing due to improper error being thrown for...

r=glob,a=glob

diff --git a/Bugzilla/Bug.pm b/Bugzilla/Bug.pm
index 3aba1774acadbda75726c25a52034965009ad3fd..a92a7077bd997ac15ab35502b71d56392db9894e 100644 (file)
--- a/Bugzilla/Bug.pm
+++ b/Bugzilla/Bug.pm
@@ -312,8 +312,8 @@ sub new {
     # If we get something that looks like a word (not a number),
     # make it the "name" param.
     if (!defined $param
-        || (!ref($param) && $param =~ /\D/)
-        || (ref($param) && $param->{id} =~ /\D/))
+        || (!ref($param) && $param !~ /^\d+$/)
+        || (ref($param) && $param->{id} !~ /^\d+$/))
     {
         if ($param) {
             my $alias = ref($param) ? $param->{id} : $param;