From aa46e391f5eba6efc0e1f73b1955f2d8a811c11c Mon Sep 17 00:00:00 2001
From: Andrew Dunstan <andrew@dunslane.net>
Date: Sat, 27 Oct 2007 14:40:34 +0000
Subject: [PATCH] prevent rgergerger idiot

---
 cgi-bin/register.pl | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/cgi-bin/register.pl b/cgi-bin/register.pl
index 7013dea..158d05e 100755
--- a/cgi-bin/register.pl
+++ b/cgi-bin/register.pl
@@ -78,7 +78,7 @@ unless ($os && $osv && $comp && $compv && $arch && $email && $owner)
 
 # some idiot has a script that tries to talk to me
 # this should catch and dispose of him
-if (grep {/\@pgbuildfarm\.org|Content-Type:|http:|mailto:|href=|None|Unknown/} $os,$osv,$comp,$compv,$arch,$email,$owner)
+if (grep {/rgergerger|\@pgbuildfarm\.org|Content-Type:|http:|mailto:|href=|None|Unknown/} $os,$osv,$comp,$compv,$arch,$email,$owner)
 {
     print 
 	"Status: 403 Forbidden - go away idiot\n",
-- 
2.30.2