From db13a676bb922fe82b6e12681981d7df780953af Mon Sep 17 00:00:00 2001 From: Paul Beckingham Date: Sat, 8 Nov 2014 14:48:27 -0500 Subject: [PATCH] Unit Tests - Enabled failing tests. Maybe it can be fixed instead. --- test/bug.819.t | 8 +++----- 1 file changed, 3 insertions(+), 5 deletions(-) diff --git a/test/bug.819.t b/test/bug.819.t index b8f76251d..256bf494c 100755 --- a/test/bug.819.t +++ b/test/bug.819.t @@ -47,13 +47,11 @@ if (open my $fh, '>', $rc) # Bug 819: When I run "task add foo\'s bar." the description of the new task is "foo 's bar .". qx{../src/task rc:$rc add foo\\'s bar. 2>&1}; qx{../src/task rc:$rc add foo \\(bar\\) 2>&1}; -qx{../src/task rc:$rc add \\'baz \\(qux\\)\\' 2>&1}; +qx{../src/task rc:$rc add 'baz (qux)' 2>&1}; + my $output = qx{../src/task rc:$rc ls 2>&1}; like ($output, qr/foo's bar\./, "$ut: foo's bar. --> preserved"); - -#like ($output, qr/foo \(bar\)/, "foo \(bar\) -- preserved"); -pass ("$ut: foo \(bar\) -- preserved -- TEST SKIPPED --"); - +like ($output, qr/foo \(bar\)/, "$ut: foo \(bar\) -- preserved"); like ($output, qr/baz \(qux\)/, "$ut: baz \(qux\) -- preserved"); # Cleanup.