From 1a7c45398738cdb4eaafdc9e0962272f19d54816 Mon Sep 17 00:00:00 2001
From: Tar Committer <tar@ocjtech.us>
Date: Tue, 5 Dec 2006 16:52:12 +0000
Subject: Imported from rancid-2.3.2a6.tar.gz.

---
 bin/mrancid.in | 12 ++++++++----
 1 file changed, 8 insertions(+), 4 deletions(-)

(limited to 'bin/mrancid.in')

diff --git a/bin/mrancid.in b/bin/mrancid.in
index a97e4d9..f77779e 100644
--- a/bin/mrancid.in
+++ b/bin/mrancid.in
@@ -1,7 +1,8 @@
 #! @PERLV_PATH@
 ##
-## $Id: mrancid.in,v 1.17 2006/05/28 16:38:51 heas Exp $
+## $Id: mrancid.in,v 1.19 2006/10/05 04:27:43 heas Exp $
 ##
+## @PACKAGE@ @VERSION@
 ## Copyright (C) 1997-2006 by Terrapin Communications, Inc.
 ## All rights reserved.
 ##
@@ -24,10 +25,14 @@
 #
 #  RANCID - Really Awesome New Cisco confIg Differ
 #
-# usage: rancid [-d] [-l] [-f filename | hostname]
+# usage: rancid [-dV] [-l] [-f filename | hostname]
 #
 use Getopt::Std;
-getopts('dfl');
+getopts('dflV');
+if ($opt_V) {
+    print "@PACKAGE@ @VERSION@\n";
+    exit(0);
+}
 $log = $opt_l;
 $debug = $opt_d;
 $file = $opt_f;
@@ -293,7 +298,6 @@ sub WriteTerm {
 	    ProcessHistory("IPHOST","numsort","$1","$_") && next;
 
 	# end of config
-	#if (/^end(\n\[OK])?$/) {
 	if (/^(: )?end$/) {
 	    $found_end = 1;
 	    return(1);
-- 
cgit