diff options
author | Thierry Vignaud <thierry.vignaud@gmail.com> | 2015-05-19 05:00:38 -0400 |
---|---|---|
committer | Thierry Vignaud <thierry.vignaud@gmail.com> | 2016-01-02 14:57:52 +0100 |
commit | 52a339833b6189e59572ead48cf151ac655ffb21 (patch) | |
tree | befe3645812505930e1bb35dc0d7a34bd3ca2d82 /perl-install | |
parent | 3292faca5e819f87e054580ef0e707af2062f8fd (diff) | |
download | drakx-52a339833b6189e59572ead48cf151ac655ffb21.tar drakx-52a339833b6189e59572ead48cf151ac655ffb21.tar.gz drakx-52a339833b6189e59572ead48cf151ac655ffb21.tar.bz2 drakx-52a339833b6189e59572ead48cf151ac655ffb21.tar.xz drakx-52a339833b6189e59572ead48cf151ac655ffb21.zip |
handle case where mntpnt has spaces
Diffstat (limited to 'perl-install')
-rw-r--r-- | perl-install/lvm.pm | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/perl-install/lvm.pm b/perl-install/lvm.pm index f48f2970e..ffdba0b3e 100644 --- a/perl-install/lvm.pm +++ b/perl-install/lvm.pm @@ -226,6 +226,7 @@ sub suggest_lv_name_from_mnt_point { $str = "root" if $str eq '/'; $str =~ s!^/!!; $str =~ s!/!_!g; + $str =~ s! !_!g; 'lv_' . $str; } |