summaryrefslogtreecommitdiffstats
path: root/contrib/check_wins.pl
diff options
context:
space:
mode:
Diffstat (limited to 'contrib/check_wins.pl')
-rwxr-xr-xcontrib/check_wins.pl7
1 files changed, 3 insertions, 4 deletions
diff --git a/contrib/check_wins.pl b/contrib/check_wins.pl
index 0d11737..f11f864 100755
--- a/contrib/check_wins.pl
+++ b/contrib/check_wins.pl
@@ -1,8 +1,7 @@
1#!/usr/bin/perl -w 1#!/usr/bin/perl -w
2 2
3# $Id$ 3# $Id: check_wins.pl 940 2004-11-25 04:46:16Z stanleyhopcroft $
4 4
5# $Log$
6# Revision 1.3 2004/11/25 04:46:16 stanleyhopcroft 5# Revision 1.3 2004/11/25 04:46:16 stanleyhopcroft
7# Non functional tidy ups to check_wins 6# Non functional tidy ups to check_wins
8# 7#
@@ -190,7 +189,7 @@ sub print_usage () {
190} 189}
191 190
192sub print_help () { 191sub print_help () {
193 print_revision($PROGNAME,'$Revision$ '); 192 print_revision($PROGNAME,'$Revision: 940 $ ');
194 print "Copyright (c) 2001 Karl DeBisschop/S Hopcroft 193 print "Copyright (c) 2001 Karl DeBisschop/S Hopcroft
195 194
196Perl Check WINS plugin for NetSaint. 195Perl Check WINS plugin for NetSaint.
@@ -237,7 +236,7 @@ The plugin works by
237} 236}
238 237
239sub version () { 238sub version () {
240 print_revision($PROGNAME,'$Revision$ '); 239 print_revision($PROGNAME,'$Revision: 940 $ ');
241 exit $ERRORS{'OK'}; 240 exit $ERRORS{'OK'};
242} 241}
243 242