From 574a9c0456c182831b3d01a4d7ee0c737b91b107 Mon Sep 17 00:00:00 2001
From: Russ Allbery <rra@stanford.edu>
Date: Tue, 9 Jun 2009 14:39:39 -0700
Subject: Remove Subversion Id strings

---
 contrib/convert-srvtab-db | 1 -
 contrib/used-principals   | 1 -
 contrib/wallet-report     | 3 +--
 3 files changed, 1 insertion(+), 4 deletions(-)

(limited to 'contrib')

diff --git a/contrib/convert-srvtab-db b/contrib/convert-srvtab-db
index 74b19a7..8d3b31e 100755
--- a/contrib/convert-srvtab-db
+++ b/contrib/convert-srvtab-db
@@ -1,5 +1,4 @@
 #!/usr/bin/perl -w
-our $ID = q$Id$;
 #
 # convert-srvtab-db -- Converts a leland_srvtab database to wallet
 #
diff --git a/contrib/used-principals b/contrib/used-principals
index f5abaf0..c4a6c07 100755
--- a/contrib/used-principals
+++ b/contrib/used-principals
@@ -1,5 +1,4 @@
 #!/usr/bin/perl -w
-our $ID = q$Id$;
 #
 # used-principals -- Report which Kerberos v5 principals are in use.
 #
diff --git a/contrib/wallet-report b/contrib/wallet-report
index 6f09914..1abe1f8 100755
--- a/contrib/wallet-report
+++ b/contrib/wallet-report
@@ -1,5 +1,4 @@
 #!/usr/bin/perl -w
-$ID = q$Id$;
 #
 # wallet-report -- Report on keytabs in the wallet database.
 #
@@ -41,7 +40,7 @@ $ADDRESS = 'nobody@example.com';
 require 5.005;
 
 use strict;
-use vars qw($ADDRESS $DUMPFILE $ID @PATTERNS $REPORTS);
+use vars qw($ADDRESS $DUMPFILE @PATTERNS $REPORTS);
 
 use Getopt::Long qw(GetOptions);
 use File::Path qw(mkpath);
-- 
cgit v1.2.3