diff options
author | cvs2svn <cvs2svn@FreeBSD.org> | 2000-06-18 10:00:08 +0000 |
---|---|---|
committer | cvs2svn <cvs2svn@FreeBSD.org> | 2000-06-18 10:00:08 +0000 |
commit | e497906508084a5501f27a53a8ec0f23aa446e5b (patch) | |
tree | 152d32d807e92b14ac8ade604a4d650b637b1e93 /emulators/vmware3/files/df | |
parent | A new index, with 3,403 ports, which is a nice number, being 41 times (diff) |
This commit was manufactured by cvs2svn to create tag 'RELEASE_3_5_0'.release/3.5.0
Diffstat (limited to 'emulators/vmware3/files/df')
-rw-r--r-- | emulators/vmware3/files/df | 31 |
1 files changed, 0 insertions, 31 deletions
diff --git a/emulators/vmware3/files/df b/emulators/vmware3/files/df deleted file mode 100644 index b9db0532e013..000000000000 --- a/emulators/vmware3/files/df +++ /dev/null @@ -1,31 +0,0 @@ -#!/usr/bin/perl -# Hacky emulation of GNU df. -# Intented to use with vmware wizard. -# Depend from the _absence_ linux version perl in the dir /compat/linux/usr/bin/ -# -# $FreeBSD$ -# -@NARGV=('-n'); -$type=0; -foreach (@ARGV) { - exit if $_ eq '-n'; # Aargh it's me again, exit immediatly - next if $_ eq '-P'; - $type=1,next if $_ eq '-T'; - push @NARGV, $_; -} - -$line = 0; - -open(DF,"-|") or exec '/bin/df', @NARGV; -while(<DF>) { - - unless ($type) { print $_; next;} - @cols = split(); - if ($line++) { - $col = 'ext2fs'; - } else { - $col = 'Type'; - } - @cols = (@cols[0], $col, @cols[1..$#cols]); - print join("\t", @cols),"\n"; -} |