From 4b366f54be11045f74310f2170cd199e4df92209 Mon Sep 17 00:00:00 2001
From: "bbaetz%student.usyd.edu.au" <>
Date: Sun, 31 Mar 2002 10:39:11 +0000
Subject: Bug 133210 - typo in checksetup; uses $::params instead of $::param
 Patch by zeroJ@null.net (John Vandenberg), r=bbaetz, zach

---
 checksetup.pl | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

(limited to 'checksetup.pl')

diff --git a/checksetup.pl b/checksetup.pl
index 5e9006ba3..30ed3cc6e 100755
--- a/checksetup.pl
+++ b/checksetup.pl
@@ -1621,9 +1621,9 @@ if ($sth->rows == 0) {
   if (-e "data/params") { 
     require "data/params"; # if they have a params file, use that
   }
-  if ($::params{emailregexp}) {
-    $mailcheckexp = $::params{emailregexp};
-    $mailcheck    = $::params{emailregexpdesc};
+  if ($::param{emailregexp}) {
+    $mailcheckexp = $::param{emailregexp};
+    $mailcheck    = $::param{emailregexpdesc};
   } else {
     $mailcheckexp = '^[^@]+@[^@]+\\.[^@]+$';
     $mailcheck    = 'A legal address must contain exactly one \'@\', 
-- 
cgit v1.2.3-24-g4f1b