From 8f485f147fc9e6e42ab4f3dd1c3a19461c1f9694 Mon Sep 17 00:00:00 2001 From: Pascal Rigaux Date: Tue, 18 Oct 2005 08:38:20 +0000 Subject: use vol_id to find device type (fs_type and pt_type) --- perl-install/c/stuff.xs.pl | 21 --------------------- 1 file changed, 21 deletions(-) (limited to 'perl-install/c/stuff.xs.pl') diff --git a/perl-install/c/stuff.xs.pl b/perl-install/c/stuff.xs.pl index 5cf4b3801..4830ae8e0 100644 --- a/perl-install/c/stuff.xs.pl +++ b/perl-install/c/stuff.xs.pl @@ -48,10 +48,6 @@ typedef __uint8_t u8; #include -/* for is_ext3 */ -#include -#include - // for UPS on USB: # define HID_MAX_USAGES 1024 #include @@ -202,23 +198,6 @@ is_secure_file(filename) OUTPUT: RETVAL -int -is_ext3(device_name) - char * device_name - CODE: - { - ext2_filsys fs; - int retval = ext2fs_open (device_name, 0, 0, 0, unix_io_manager, &fs); - if (retval) { - RETVAL = 0; - } else { - RETVAL = fs->super->s_feature_compat & EXT3_FEATURE_COMPAT_HAS_JOURNAL; - ext2fs_close(fs); - } - } - OUTPUT: - RETVAL - void init_setlocale() CODE: -- cgit v1.2.1