diff options
| author | Thierry Vignaud <thierry.vignaud@gmail.com> | 2015-02-23 18:08:13 +0100 |
|---|---|---|
| committer | Thomas Backlund <tmb@mageia.org> | 2015-03-20 22:25:49 +0159 |
| commit | 031168019ff8a7ee03c16f896620c3b0b6417257 (patch) | |
| tree | aa70c761e0e82fb4cecb0cc160a19af09d8e0233 /perl-install/c/stuff.xs.pl | |
| parent | f04716d1dca0722da0dee55316c50cba4d8ee1ae (diff) | |
| download | drakx-031168019ff8a7ee03c16f896620c3b0b6417257.tar drakx-031168019ff8a7ee03c16f896620c3b0b6417257.tar.gz drakx-031168019ff8a7ee03c16f896620c3b0b6417257.tar.bz2 drakx-031168019ff8a7ee03c16f896620c3b0b6417257.tar.xz drakx-031168019ff8a7ee03c16f896620c3b0b6417257.zip | |
bind ped_disk_commit_to_os
needed for next commit
Diffstat (limited to 'perl-install/c/stuff.xs.pl')
| -rwxr-xr-x | perl-install/c/stuff.xs.pl | 16 |
1 files changed, 16 insertions, 0 deletions
diff --git a/perl-install/c/stuff.xs.pl b/perl-install/c/stuff.xs.pl index 245746821..e6bcfa0db 100755 --- a/perl-install/c/stuff.xs.pl +++ b/perl-install/c/stuff.xs.pl @@ -720,6 +720,22 @@ disk_add_partition(char * device_path, double start, double length, const char * OUTPUT: RETVAL +int +tell_kernel_to_reread_partition_table(char * device_path) + CODE: + PedDevice *dev = ped_device_get(device_path); + RETVAL=0; + if(dev) { + PedDisk* disk = ped_disk_new(dev); + if (disk) { + if (ped_disk_commit_to_os (disk)) + RETVAL=1; + ped_disk_destroy(disk); + } + } + OUTPUT: + RETVAL + #define BACKTRACE_DEPTH 20 |