aboutsummaryrefslogtreecommitdiffstats
path: root/t/01packdrakeng.t
diff options
context:
space:
mode:
authorOlivier Thauvin <nanardon@mandriva.org>2004-12-14 00:02:26 +0000
committerOlivier Thauvin <nanardon@mandriva.org>2004-12-14 00:02:26 +0000
commit713e1c24d769bde79a146239ae324ccf74b31929 (patch)
tree4120f432ce69a2d1faf80ce9aa8098fafcb9d551 /t/01packdrakeng.t
parent084f20aea7d3c6087593cc63ec603ae1741bd6ac (diff)
downloadrpmtools-713e1c24d769bde79a146239ae324ccf74b31929.tar
rpmtools-713e1c24d769bde79a146239ae324ccf74b31929.tar.gz
rpmtools-713e1c24d769bde79a146239ae324ccf74b31929.tar.bz2
rpmtools-713e1c24d769bde79a146239ae324ccf74b31929.tar.xz
rpmtools-713e1c24d769bde79a146239ae324ccf74b31929.zip
- don't use File::* modules
Diffstat (limited to 't/01packdrakeng.t')
-rwxr-xr-xt/01packdrakeng.t16
1 files changed, 15 insertions, 1 deletions
diff --git a/t/01packdrakeng.t b/t/01packdrakeng.t
index fd0c3d6..6216dd5 100755
--- a/t/01packdrakeng.t
+++ b/t/01packdrakeng.t
@@ -3,7 +3,7 @@
# $Id$
use strict;
-use Test::More tests => 32;
+use Test::More tests => 37;
use Digest::MD5;
use_ok('Packdrakeng');
@@ -79,6 +79,20 @@ sub test_packing {
$pack = undef;
}
+# Testing simple additionnal function:
+clean_test_files();
+
+{
+my ($handle, $filename) = Packdrakeng::tempfile();
+ok($handle && $filename, "can create temp file");
+ok(-f $filename, "Temp file exist");
+ok(print($handle $coin), "can write into file");
+close($handle);
+unlink($filename);
+
+ok(Packdrakeng::mkpath('test/parent/child'), "can create dir like mkdir -p");
+ok(-d 'test/parent/child', "the dir really exist");
+}
# Single test:
{