From a4d8d6c87bd14c630159da1a029968b1434bd20f Mon Sep 17 00:00:00 2001
From: Pascal Rigaux <pixel@mandriva.com>
Date: Thu, 4 Jul 2002 11:22:09 +0000
Subject: removed since unused

---
 perl-install/do_resize_fat | 18 ------------------
 perl-install/getpkgs_deps  | 10 ----------
 2 files changed, 28 deletions(-)
 delete mode 100755 perl-install/do_resize_fat
 delete mode 100755 perl-install/getpkgs_deps

(limited to 'perl-install')

diff --git a/perl-install/do_resize_fat b/perl-install/do_resize_fat
deleted file mode 100755
index 41ebf1b83..000000000
--- a/perl-install/do_resize_fat
+++ /dev/null
@@ -1,18 +0,0 @@
-#!/usr/bin/perl
-
-use diagnostics;
-use strict;
-
-use lib qw(/usr/lib/libDrakX);
-use common;
-use resize_fat::main;
-
-local *log::l = sub { print join(' ', @_), "\n" };
-
-@ARGV = qw(/mnt/iso/w +0);
-
-@ARGV == 2 or die "usage: fatresize <device> <size>\n  <size> = 100 means `resize to 100Mb'\n  <size> = +10 means `keep 10Mb of free space'\n";
-
-my $fs = new resize_fat::main(common::basename($ARGV[0]), $ARGV[0]);
-resize_fat::main::resize($fs, $ARGV[1]);
-
diff --git a/perl-install/getpkgs_deps b/perl-install/getpkgs_deps
deleted file mode 100755
index bc2d5e0e8..000000000
--- a/perl-install/getpkgs_deps
+++ /dev/null
@@ -1,10 +0,0 @@
-#!/usr/bin/perl
-
-use diagnostics;
-use strict;
-
-use lib qw(/usr/bin/perl-install . c c/blib/arch);
-use pkgs_deps;
-use pkgs;
-
-pkgs_deps::main(pkgs::psUsingDirectory());
-- 
cgit v1.2.1