diff options
| author | Pascal Rigaux <pixel@mandriva.com> | 2001-09-16 18:35:07 +0000 |
|---|---|---|
| committer | Pascal Rigaux <pixel@mandriva.com> | 2001-09-16 18:35:07 +0000 |
| commit | 8c7c8f9e1497f80cbe9bbdc1bf0b8552b7dd88cb (patch) | |
| tree | 9521630ef9f9857cc3bb5c5ce606a958de4516cf /perl-install/any.pm | |
| parent | cf616f12521a0f539e4f02f70d0210beb0102320 (diff) | |
| download | drakx-backup-do-not-use-8c7c8f9e1497f80cbe9bbdc1bf0b8552b7dd88cb.tar drakx-backup-do-not-use-8c7c8f9e1497f80cbe9bbdc1bf0b8552b7dd88cb.tar.gz drakx-backup-do-not-use-8c7c8f9e1497f80cbe9bbdc1bf0b8552b7dd88cb.tar.bz2 drakx-backup-do-not-use-8c7c8f9e1497f80cbe9bbdc1bf0b8552b7dd88cb.tar.xz drakx-backup-do-not-use-8c7c8f9e1497f80cbe9bbdc1bf0b8552b7dd88cb.zip | |
use new mkdir_p, rm_rf and cp_af from MDK::Common
Diffstat (limited to 'perl-install/any.pm')
| -rw-r--r-- | perl-install/any.pm | 5 |
1 files changed, 2 insertions, 3 deletions
diff --git a/perl-install/any.pm b/perl-install/any.pm index 0d27c8eaa..3fcc19916 100644 --- a/perl-install/any.pm +++ b/perl-install/any.pm @@ -7,7 +7,6 @@ use strict; #- misc imports #-###################################################################################### use common; -use commands; use detect_devices; use partition_table qw(:types); use fsedit; @@ -39,7 +38,7 @@ sub facesnames { sub addKdmIcon { my ($prefix, $user, $icon) = @_; my $dest = "$prefix/usr/share/faces/$user.png"; - eval { commands::cp("-f", facesdir($prefix) . $icon . ".png", $dest) } if $icon; + eval { cp_af(facesdir($prefix) . $icon . ".png", $dest) } if $icon; } sub allocUsers { @@ -509,7 +508,7 @@ END } #- install kppprc file according to used configuration. - commands::mkdir_("-p", "$prefix/usr/share/config"); + mkdir_p("$prefix/usr/share/config"); local *KPPPRC; open KPPPRC, ">$prefix/usr/share/config/kppprc" or die "Can't open $prefix/usr/share/config/kppprc: $!"; #chmod 0600, "$prefix/usr/share/config/kppprc"; |