From e8ebb6990c47b225e36ddd65c65a9182a6e2642d Mon Sep 17 00:00:00 2001 From: Thierry Vignaud Date: Mon, 6 Mar 2017 22:14:05 +0100 Subject: (get_partition_flag) kill it it's unused since commit 1daabebda57976579465e5c281eaa14088e0e37f --- perl-install/c/stuff.xs.pl | 22 ---------------------- 1 file changed, 22 deletions(-) diff --git a/perl-install/c/stuff.xs.pl b/perl-install/c/stuff.xs.pl index b2929adeb..f54a8689b 100755 --- a/perl-install/c/stuff.xs.pl +++ b/perl-install/c/stuff.xs.pl @@ -610,28 +610,6 @@ get_iso_volume_ids(int fd) print ' -int -get_partition_flag(char * device_path, int part_number, char *type) - CODE: - PedDevice *dev = ped_device_get(device_path); - RETVAL = 0; - if(dev) { - PedDisk* disk = ped_disk_new(dev); - if(disk) { - PedPartition* part = ped_disk_get_partition(disk, part_number); - if (!part) { - printf("is_partition_ESP: failed to find partition\n"); - } else { - PedPartitionFlag flag = string_to_pedpartflag(type); - if (flag) - RETVAL=ped_partition_get_flag(part, flag); - } - ped_disk_destroy(disk); - } - } - OUTPUT: - RETVAL - int set_partition_flag(char * device_path, int part_number, char *type) CODE: -- cgit v1.2.1