From: Stephen L Johnson <sjohnson@monsters.org>
Date: Mon, 2 Jun 2003 20:54:27 +0000 (+0000)
Subject: Fixed problem with file name regexp in remove_np_files(). Thank to John Faichney
X-Git-Tag: spong-2_8_0-beta1~37
X-Git-Url: http://git.etc.gen.nz/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=b56b820364005ab087544ada5af96cc1c4206eb5;p=spong.git

Fixed problem with file name regexp in remove_np_files(). Thank to John Faichney
---

diff --git a/src/spong-server.pl b/src/spong-server.pl
index 12a5847..a3ffd25 100755
--- a/src/spong-server.pl
+++ b/src/spong-server.pl
@@ -6,7 +6,7 @@
 # There are one or more update processes that listen for status updates 
 # from client programs.
 
-# $Id: spong-server.pl,v 1.59 2003/05/14 06:02:01 sljohnson Exp $
+# $Id: spong-server.pl,v 1.60 2003/06/02 20:54:27 sljohnson Exp $
 
 use lib "@@LIBDIR@@";
 
@@ -1303,7 +1303,7 @@ sub remove_np_files {
    if (! @files) { return; }
 
    foreach $file (@files) {
-      if ( $file =~ m/^np-[^-]-$host-$service/ ) {
+      if ( $file =~ m/^np-[^\-]+-$host-$service/ ) {
          unlink "$SPONGTMP/$file";
       }
    }