diff options
author | Martin Whitaker <mageia@martin-whitaker.me.uk> | 2017-12-10 14:56:58 +0000 |
---|---|---|
committer | Martin Whitaker <mageia@martin-whitaker.me.uk> | 2017-12-10 14:56:58 +0000 |
commit | 7e53518a7d8709998482eef1e9da21ee1a1886a9 (patch) | |
tree | 86c218545d2f570bfcccfde4939229f1c5aa4928 /draklive2 | |
parent | e1e2e7175f03eb4deeffbba15907af145baba626 (diff) | |
download | drakiso-7e53518a7d8709998482eef1e9da21ee1a1886a9.tar drakiso-7e53518a7d8709998482eef1e9da21ee1a1886a9.tar.gz drakiso-7e53518a7d8709998482eef1e9da21ee1a1886a9.tar.bz2 drakiso-7e53518a7d8709998482eef1e9da21ee1a1886a9.tar.xz drakiso-7e53518a7d8709998482eef1e9da21ee1a1886a9.zip |
Reduce noise from perl_checker.
Diffstat (limited to 'draklive2')
-rwxr-xr-x | draklive2 | 4 |
1 files changed, 2 insertions, 2 deletions
@@ -28,7 +28,7 @@ use modules; use run_program; use Getopt::Long; use Pod::Usage; -use Cwd qw(abs_path); +use Cwd; use File::Temp; use File::Copy qw(mv); use IO::Handle; #- autoflush @@ -59,7 +59,7 @@ sub mount_system_fs { sub umount_external_fs { my ($live) = @_; - my $system_root = abs_path($live->get_system_root); + my $system_root = Cwd::abs_path($live->get_system_root); my @mounts = grep { $_ =~ $system_root } split("\n", cat_('/proc/mounts')); foreach (reverse(@mounts)) { my @field = split(' ' , $_); |