From 1bb907f76d9d837f85ddee96ba3a8f365453ad5e Mon Sep 17 00:00:00 2001 From: Paul Beckingham Date: Sat, 10 Oct 2009 11:18:38 -0400 Subject: [PATCH] Unit tests - rc.t - Added tests for the new rc.name=value form, in addition to the existing rc.name:value form. --- src/tests/rc.t | 16 ++++++++++++++-- 1 file changed, 14 insertions(+), 2 deletions(-) diff --git a/src/tests/rc.t b/src/tests/rc.t index 633cb0417..11dbb12a1 100755 --- a/src/tests/rc.t +++ b/src/tests/rc.t @@ -29,9 +29,9 @@ use strict; use warnings; use File::Path; -use Test::More tests => 4; +use Test::More tests => 8; -# Create the rc file. +# Create the rc file, using rc.name:value. unlink 'foo.rc'; rmtree 'foo', 0, 0; qx{echo 'y'|../task rc:foo.rc rc.data.location:foo}; @@ -45,5 +45,17 @@ ok (!-r 'foo', 'Removed foo'); unlink 'foo.rc'; ok (!-r 'foo.rc', 'Removed foo.rc'); +# Do it all again, with rc.name=value. +qx{echo 'y'|../task rc:foo.rc rc.data.location:foo}; + +ok (-r 'foo.rc', 'Created default rc file'); +ok (-d 'foo', 'Created default data directory'); + +rmtree 'foo', 0, 0; +ok (!-r 'foo', 'Removed foo'); + +unlink 'foo.rc'; +ok (!-r 'foo.rc', 'Removed foo.rc'); + exit 0;