From: Stephen L Johnson <sjohnson@monsters.org>
Date: Tue, 30 Nov 1999 06:24:06 +0000 (+0000)
Subject: Fixed problem with --services query command.
X-Git-Tag: spong-2_6-beta7~4
X-Git-Url: http://git.etc.gen.nz/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=da2dc81516d8600a9c1a8242dc5627a301587cee;p=spong.git

Fixed problem with --services query command.
'service_list' should have been 'services'.
---

diff --git a/src/spong-server.pl b/src/spong-server.pl
index eb3abff..61252a5 100755
--- a/src/spong-server.pl
+++ b/src/spong-server.pl
@@ -510,7 +510,7 @@ sub show_host {
 
 sub show_services {
    my( $hosts, $type, $view ) = @_;
-   Spong::Host->new( $hosts )->service_list()->display( $type, $view ); }
+   Spong::Host->new( $hosts )->services()->display( $type, $view ); }
 
 sub show_stats {
    my( $hosts, $type, $view ) = @_;