From a70f48a017be61c7f2d357b47e5f7bd20c3e3de9 Mon Sep 17 00:00:00 2001
From: "terry%mozilla.org" <>
Date: Sat, 7 Aug 1999 00:00:33 +0000
Subject: Last patch didn't work -- perl doesn't like the "scaler" function.

---
 buglist.cgi | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/buglist.cgi b/buglist.cgi
index dbf1197c9..07e05900f 100755
--- a/buglist.cgi
+++ b/buglist.cgi
@@ -771,7 +771,7 @@ if ($::usergroupset ne '0' && $buggroupset =~ /^\d*$/) {
         $knum++;
     }
     my @statuskeys = keys %statushash;
-    if (scaler(@statuskeys) == 1) {
+    if (1 == @statuskeys) {
         if (defined $statushash{'RESOLVED'}) {
             print "
 <INPUT TYPE=radio NAME=knob VALUE=verify>
-- 
cgit v1.2.3-24-g4f1b