From 4d4e740f5cbbe79009582f491a62cc711fab34bc Mon Sep 17 00:00:00 2001
From: Paul Beckingham <paul@beckingham.net>
Date: Sat, 7 Jun 2014 09:45:58 -0400
Subject: [PATCH] Unit Tests

- Added ANNOTATED tests.
---
 test/tag.t | 8 +++++++-
 1 file changed, 7 insertions(+), 1 deletion(-)

diff --git a/test/tag.t b/test/tag.t
index 29f2e4baa..1fb6161a0 100755
--- a/test/tag.t
+++ b/test/tag.t
@@ -27,7 +27,7 @@
 
 use strict;
 use warnings;
-use Test::More tests => 30;
+use Test::More tests => 32;
 
 # Ensure environment has no influence.
 delete $ENV{'TASKDATA'};
@@ -76,6 +76,7 @@ qx{../src/task rc:$rc add deleted 2>&1; ../src/task rc:$rc 2 delete 2>&1};
 qx{../src/task rc:$rc add minimal 2>&1};
 qx{../src/task rc:$rc add maximal +tag pro:PRO pri:H due:yesterday 2>&1};
 qx{../src/task rc:$rc 4 start 2>&1};
+qx{../src/task rc:$rc 4 annotate note 2>&1};
 qx{../src/task rc:$rc add blocked depends:1 2>&1};
 qx{../src/task rc:$rc add due_eom due:eom 2>&1};
 qx{../src/task rc:$rc add due_eow due:eow 2>&1};
@@ -143,6 +144,11 @@ like ($output, qr/maximal/, "$ut: +ACTIVE");
 $output = qx{../src/task rc:$rc -ACTIVE list};
 unlike ($output, qr/maximal/, "$ut: -ACTIVE");
 
+$output = qx{../src/task rc:$rc +ANNOTATED list};
+like ($output, qr/maximal/, "$ut: +ANNOTATED");
+$output = qx{../src/task rc:$rc -ANNOTATED list};
+unlike ($output, qr/maximal/, "$ut: -ANNOTATED");
+
 # Cleanup.
 unlink qw(pending.data completed.data undo.data backlog.data), $rc;
 exit 0;