From dd51100de1d59633240dfa3bb58d739eab20b143 Mon Sep 17 00:00:00 2001 From: Pascal Rigaux Date: Wed, 3 Aug 2005 03:29:09 +0000 Subject: minimal (and quite hidden) reiser4 support in diskdrake (bugzilla #15839) --- perl-install/fs/format.pm | 1 + perl-install/fs/type.pm | 1 + 2 files changed, 2 insertions(+) (limited to 'perl-install/fs') diff --git a/perl-install/fs/format.pm b/perl-install/fs/format.pm index 97ce94740..7975074ea 100644 --- a/perl-install/fs/format.pm +++ b/perl-install/fs/format.pm @@ -13,6 +13,7 @@ my %cmds = ( ext2 => [ 'e2fsprogs', 'mkfs.ext2', '-F' ], ext3 => [ 'e2fsprogs', 'mkfs.ext2', '-F', '-j' ], reiserfs => [ 'reiserfsprogs', 'mkfs.reiserfs', '-ff' ], + reiser4 => [ 'reiser4progs', 'mkfs.reiser4', '-f' ], xfs => [ 'xfsprogs', 'mkfs.xfs', '-f', '-q' ], jfs => [ 'jfsprogs', 'mkfs.jfs', '-f' ], hfs => [ 'hfsutils', 'hformat' ], diff --git a/perl-install/fs/type.pm b/perl-install/fs/type.pm index d641c8945..0fa20c2c8 100644 --- a/perl-install/fs/type.pm +++ b/perl-install/fs/type.pm @@ -122,6 +122,7 @@ if_(arch() !~ /ppc/, 0x75 => '', 'PC/IX', 0x80 => '', 'Old Minix', 0x81 => '', 'Minix / old Linux', + 0x83 => 'reiser4', 'Journalised FS: Reiser4', 0x84 => '', 'OS/2 hidden C: drive', 0x86 => '', 'NTFS volume set', 0x87 => '', 'NTFS volume set ', -- cgit v1.2.1