From fe6aef4bcdc08f7225c22c84ac283166aca6884e Mon Sep 17 00:00:00 2001
From: ajt <>
Date: Tue, 15 Jul 2003 12:04:33 -0800
Subject: [PATCH] [project @ 2003-07-15 13:04:33 by ajt] add some brackets for
 keys(%limit_pkgs)

---
 scripts/service.in | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/scripts/service.in b/scripts/service.in
index 1781ebac..ffae9b16 100755
--- a/scripts/service.in
+++ b/scripts/service.in
@@ -1,5 +1,5 @@
 #!/usr/bin/perl
-# $Id: service.in,v 1.80 2003/07/15 13:03:33 ajt Exp $
+# $Id: service.in,v 1.81 2003/07/15 13:04:33 ajt Exp $
 # ^ more or less ^
 #
 # Usage: service <code>.nn
@@ -782,7 +782,7 @@ sub setbug {
         return 0;
     }
 
-    if (keys %limit_pkgs && not defined $limit_pkgs{$data->{package}}) {
+    if (keys(%limit_pkgs) && not defined $limit_pkgs{$data->{package}}) {
 	&transcript("$gBug number $ref belongs to package $data->{package}, skipping.\n\n");
 	&cancelbug;
 	return 0;
-- 
2.39.5