From 8adef8d5cc14c1ebe944ddea89b5d652f3972728 Mon Sep 17 00:00:00 2001
From: Stephen L Johnson <sjohnson@monsters.org>
Date: Wed, 26 Jan 2000 05:36:13 +0000
Subject: [PATCH] removed old patches trying to fix spong-server crash caused
 by server_objects() and services()

---
 src/lib/Spong/Host.pm | 3 ---
 1 file changed, 3 deletions(-)

diff --git a/src/lib/Spong/Host.pm b/src/lib/Spong/Host.pm
index 106a59a..13e12b9 100755
--- a/src/lib/Spong/Host.pm
+++ b/src/lib/Spong/Host.pm
@@ -149,7 +149,6 @@ sub has_color {
    my( $self, $color ) = @_;
 
    foreach( $self->service_objects() ) {
-      if (! defined $_) { next; }
       if( $_->color() eq $color ) { return 1; } }
 
    return 0;
@@ -354,7 +353,6 @@ sub _problem_service {
    my( $services, @problist, $probtime, $summary );
 
    foreach $service ( $self->service_objects() ) {
-      if ( ! defined $service ) { next; }
       if( $service->has_problem() ) {
 	 push( @problist, $service->name() );
 	 $summary = $service->summary();
@@ -381,7 +379,6 @@ sub _problem_message {
    my( $services, @problist, $probtime, $summary );
 
    foreach $service ( $self->service_objects() ) {
-      if( ! defined $service ) { next; }
       if( $service->has_problem() ) {
 	 push( @problist, $service->name() );
 	 $summary = $service->summary();
-- 
2.30.2