diff options
| author | Thierry Vignaud <thierry.vignaud@gmail.com> | 2015-03-24 10:52:24 -0400 |
|---|---|---|
| committer | Thierry Vignaud <thierry.vignaud@gmail.com> | 2015-03-25 19:55:33 +0100 |
| commit | b2df46a676b8511523ab6859f5393680316e1b1f (patch) | |
| tree | c4fb6ea46bb69148f5ed09a2b2105058979d4086 /perl-install/c/stuff.xs.pl | |
| parent | 134d2506afa228492d0a61f2d31486ca41ec54ef (diff) | |
| download | drakx-b2df46a676b8511523ab6859f5393680316e1b1f.tar drakx-b2df46a676b8511523ab6859f5393680316e1b1f.tar.gz drakx-b2df46a676b8511523ab6859f5393680316e1b1f.tar.bz2 drakx-b2df46a676b8511523ab6859f5393680316e1b1f.tar.xz drakx-b2df46a676b8511523ab6859f5393680316e1b1f.zip | |
fix indent
done separatly in order to have a better history for simplify then
introducing new API
Diffstat (limited to 'perl-install/c/stuff.xs.pl')
| -rwxr-xr-x | perl-install/c/stuff.xs.pl | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/perl-install/c/stuff.xs.pl b/perl-install/c/stuff.xs.pl index d4d90ac16..631271a1e 100755 --- a/perl-install/c/stuff.xs.pl +++ b/perl-install/c/stuff.xs.pl @@ -613,15 +613,15 @@ get_disk_partitions(char * device_path) part = ped_disk_next_partition(disk, part); continue; } - char *path = ped_partition_get_path(part); + char *path = ped_partition_get_path(part); HV * rh = (HV *)sv_2mortal((SV *)newHV()); hv_store(rh, "part_number", 11, newSViv(part->num), 0); hv_store(rh, "real_device", 11, newSVpv(path, 0), 0); hv_store(rh, "start", 5, newSViv(part->geom.start), 0); hv_store(rh, "size", 4, newSViv(part->geom.length), 0); hv_store(rh, "pt_type", 7, newSViv(0xba), 0); - free(path); - if(part->fs_type) + free(path); + if(part->fs_type) hv_store(rh, "fs_type", 7, newSVpv(part->fs_type->name, 0), 0); PUSHs(newRV((SV *)rh)); part = ped_disk_next_partition(disk, part); |