Remove print_deps, was only used by unused find-prov/req.pl

1 files changed, 0 insertions, 45 deletions

diff --git a/scripts/print_deps b/scripts/print_deps
deleted file mode 100755
index 9e7689718..000000000
--- a/scripts/print_deps
+++ /dev/null
@@ -1,45 +0,0 @@
-#!/usr/bin/perl
-
-# a glue program for print out dependencies based on filenames
-# by Ken Estes kestes@staff.mail.com
-
-use File::Basename;
-use Getopt::Long;
-
-
-GetOptions (	
-	    qw( identifier=s basename! )
-	      );
-	    
-
-if ("@ARGV") {
-  foreach (@ARGV) {
-    process_file($_);
-  }
-} else {
-
-  # notice we are passed a list of filenames NOT as common in unix the
-  # contents of the file.
-
-  foreach (<>) {
-    process_file($_);
-  }
-}
-
-sub process_file {
-  my ($str) = @_;
-  chomp $str;
-
-  if ($opt_basename) {
-    $str = basename($str);
-  }
-
-  if ($opt_identifier) {
-    print "${opt_identifier}(${str})\n";
-  } else {
-    print "$str\n";
-  }
-
-  return ;
-}
-