summaryrefslogtreecommitdiffstats
path: root/perl-install/any.pm
diff options
context:
space:
mode:
authorPascal Rigaux <pixel@mandriva.com>2001-09-16 18:35:07 +0000
committerPascal Rigaux <pixel@mandriva.com>2001-09-16 18:35:07 +0000
commit8c7c8f9e1497f80cbe9bbdc1bf0b8552b7dd88cb (patch)
tree9521630ef9f9857cc3bb5c5ce606a958de4516cf /perl-install/any.pm
parentcf616f12521a0f539e4f02f70d0210beb0102320 (diff)
downloaddrakx-8c7c8f9e1497f80cbe9bbdc1bf0b8552b7dd88cb.tar
drakx-8c7c8f9e1497f80cbe9bbdc1bf0b8552b7dd88cb.tar.gz
drakx-8c7c8f9e1497f80cbe9bbdc1bf0b8552b7dd88cb.tar.bz2
drakx-8c7c8f9e1497f80cbe9bbdc1bf0b8552b7dd88cb.tar.xz
drakx-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.pm5
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";