From e7aedc3aa7e08f3337c86085c6da10ca83445024 Mon Sep 17 00:00:00 2001 From: Colin Guthrie Date: Mon, 2 Dec 2013 23:40:22 +0000 Subject: rescue: Move files around and introduce proper dep tracking. This moves any perl files into bin and sbin folders which will be directly installed in /usr/bin and /usr/sbin. This is done such that the extract modes in list.xml still work and the files end up in the right places. All other files have been moved into the tree folder in their final destination. --- rescue/diskdrake-resize | 29 ----------------------------- 1 file changed, 29 deletions(-) delete mode 100755 rescue/diskdrake-resize (limited to 'rescue/diskdrake-resize') diff --git a/rescue/diskdrake-resize b/rescue/diskdrake-resize deleted file mode 100755 index 88372aac7..000000000 --- a/rescue/diskdrake-resize +++ /dev/null @@ -1,29 +0,0 @@ -#!/usr/bin/perl - -use lib qw(/usr/lib/libDrakX); - -use devices; -use log; -use resize_fat::main; -use diskdrake::resize_ntfs; -use diskdrake::resize_ext2; - -my ($device, $fs_type, $size) = @ARGV - or die "usage: $0 \n"; - -my %fs_pkgs = ( - vfat => 'resize_fat::main', - ntfs => 'diskdrake::resize_ntfs', - ext2 => 'diskdrake::resize_ext2', - ext3 => 'diskdrake::resize_ext2', - ext4 => 'diskdrake::resize_ext2', -); - -my $resize_pkg = $fs_pkgs{$fs_type} - or die "no support for $fs_type type\n"; - -log::l("resizing $device to $size"); - -my $resize = $resize_pkg->new($device, devices::make($device)) - or die "unable to initialize resize\n"; -$resize->resize($size); -- cgit v1.2.1