From: Stephen L Johnson <sjohnson@monsters.org>
Date: Sat, 13 May 2000 04:40:54 +0000 (+0000)
Subject: &save_status() was not allowing host names with upper case letters
X-Git-Tag: spong-2_7-alpha7~25
X-Git-Url: http://git.etc.gen.nz/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=7e07f585e33bdb9316c931b48b55f2756eda8bca;p=spong.git

&save_status() was not allowing host names with upper case letters
---

diff --git a/src/spong-server.pl b/src/spong-server.pl
index 9115b30..5dfb89c 100755
--- a/src/spong-server.pl
+++ b/src/spong-server.pl
@@ -559,7 +559,7 @@ sub save_status {
    if( $header =~ /^(\w+) (\S+) (\w+) (\w+) ([:0-9]+) (.*)$/ ) {
       ($cmd, $host, $service, $color, $time, $sum) = ($1, $2, $3, $4, $5, $6);
 
-      if( $host !~ m/^[a-z0-9_\-\.]+$/ ) { 
+      if( $host !~ m/^[a-zA-Z0-9_\-\.]+$/ ) { 
 	 &error( "save_status: invalid host [$host]" ); return; }
       if( $service !~ m/^[a-z0-9_\-\.]+$/ ) {
 	 &error( "save_status: invalid service [$service]" ); return; }