summaryrefslogtreecommitdiffstats
path: root/MDK
diff options
context:
space:
mode:
authorPascal Rigaux <pixel@mandriva.com>2002-12-28 10:37:20 +0000
committerPascal Rigaux <pixel@mandriva.com>2002-12-28 10:37:20 +0000
commitf6b8152ed9f18ec3c364b9b5482f0fd0a6d46233 (patch)
tree9abc27afbd30d6b6943e760d76790b02a244e6bf /MDK
parentdffd700efe1911070c853790462b33a48a07eefd (diff)
downloadperl-MDK-Common-f6b8152ed9f18ec3c364b9b5482f0fd0a6d46233.tar
perl-MDK-Common-f6b8152ed9f18ec3c364b9b5482f0fd0a6d46233.tar.gz
perl-MDK-Common-f6b8152ed9f18ec3c364b9b5482f0fd0a6d46233.tar.bz2
perl-MDK-Common-f6b8152ed9f18ec3c364b9b5482f0fd0a6d46233.tar.xz
perl-MDK-Common-f6b8152ed9f18ec3c364b9b5482f0fd0a6d46233.zip
- perl_checker: add some more Gtk2 functions
- MDK::Common::File: mkdir_p, rm_rf and cp_af returns 1 on success (allowing "eval { mkdir_p() } or ...")
Diffstat (limited to 'MDK')
-rw-r--r--MDK/Common/File.pm3
1 files changed, 3 insertions, 0 deletions
diff --git a/MDK/Common/File.pm b/MDK/Common/File.pm
index 49225a1..cc5f3b6 100644
--- a/MDK/Common/File.pm
+++ b/MDK/Common/File.pm
@@ -140,6 +140,7 @@ sub mkdir_p {
mkdir_p(dirname($dir));
mkdir($dir, 0755) or die "mkdir: error creating directory $dir: $!\n";
}
+ 1;
}
sub rm_rf {
@@ -151,6 +152,7 @@ sub rm_rf {
unlink $_ or die "rm of $_ failed: $!\n";
}
}
+ 1;
}
sub cp_af {
@@ -179,6 +181,7 @@ sub cp_af {
chmod((stat($src))[2], $dest);
}
}
+ 1;
}
sub touch {