From 143fb60d15e8cb61527abf639b7be9d0d6f60d2e Mon Sep 17 00:00:00 2001 From: Paul Beckingham Date: Thu, 25 Dec 2014 16:32:20 -0500 Subject: [PATCH] Unit Tests - Refactored, now cleaner. --- test/denotate.t | 11 +++-------- 1 file changed, 3 insertions(+), 8 deletions(-) diff --git a/test/denotate.t b/test/denotate.t index f4020e215..b70fd2ec9 100755 --- a/test/denotate.t +++ b/test/denotate.t @@ -82,15 +82,10 @@ $output = qx{../src/task rc:$rc rrr 2>&1}; unlike ($output, qr/Bert.+\d{1,2}\/\d{1,2}\/\d{4} Bibo/ms, "$ut: Delete partial match"); like ($output, qr/Bert.+\d{1,2}\/\d{1,2}\/\d{4} Kermit the frog/ms, "$ut: Kermit the frog now second annotation"); -if ($^O =~ /cygwin/) -{ - SKIP: - { - skip ("Skipping regex case-insensitive tests on Cygwin. Doesn't work.", 2); - } -} -else +SKIP: { + skip ("Skipping regex case-insensitive tests on Cygwin. Doesn't work.", 2) if $^O =~ /cygwin/; + qx{../src/task rc:$rc 1 denotate BErt 2>&1}; $output = qx{../src/task rc:$rc rrr 2>&1}; like ($output, qr/one.+\d{1,2}\/\d{1,2}\/\d{4} Bert/ms, "$ut: Denotate is case sensitive");