summaryrefslogtreecommitdiffstats
path: root/perl-install/c
diff options
context:
space:
mode:
Diffstat (limited to 'perl-install/c')
-rwxr-xr-xperl-install/c/stuff.xs.pl6
1 files changed, 3 insertions, 3 deletions
diff --git a/perl-install/c/stuff.xs.pl b/perl-install/c/stuff.xs.pl
index 229e3b8ab..72af65f27 100755
--- a/perl-install/c/stuff.xs.pl
+++ b/perl-install/c/stuff.xs.pl
@@ -637,7 +637,7 @@ set_partition_flag(char * device_path, int part_number, char *type)
if (flag)
RETVAL=ped_partition_set_flag(part, flag, 1);
if (RETVAL)
- RETVAL = ped_disk_commit(disk);
+ RETVAL = ped_disk_commit_to_dev(disk);
}
ped_disk_destroy(disk);
}
@@ -759,7 +759,7 @@ disk_del_partition(char * device_path, int part_number)
} else {
RETVAL=ped_disk_delete_partition(disk, part);
if(RETVAL) {
- RETVAL = ped_disk_commit(disk);
+ RETVAL = ped_disk_commit_to_dev(disk);
} else {
printf("del_partition failed\n");
}
@@ -786,7 +786,7 @@ disk_add_partition(char * device_path, double start, double length, const char *
} else
RETVAL = ped_disk_add_partition (disk, part, constraint);
if(RETVAL) {
- RETVAL = ped_disk_commit(disk);
+ RETVAL = ped_disk_commit_to_dev(disk);
} else {
printf("add_partition failed\n");
}