[Bps-public-commit] r10296 - in Net-Hiveminder: lib/Net

[sartak at bestpractical.com]

Author: sartak
Date: Sat Jan 12 22:41:09 2008
New Revision: 10296

Modified:
   Net-Hiveminder/   (props changed)
   Net-Hiveminder/lib/Net/Hiveminder.pm

Log:
 r50232 at onn:  sartak | 2008-01-12 22:40:33 -0500
 Add a done method for marking tasks as done


Modified: Net-Hiveminder/lib/Net/Hiveminder.pm
==============================================================================
--- Net-Hiveminder/lib/Net/Hiveminder.pm	(original)
+++ Net-Hiveminder/lib/Net/Hiveminder.pm	Sat Jan 12 22:41:09 2008
@@ -325,6 +325,21 @@
     return $priorities[$priority];
 }
 
+=head2 done LOCATORS
+
+Marks the given tasks as complete.
+
+=cut
+
+sub done {
+    my $self = shift;
+
+    for (@_) {
+        my $id = $LOCATOR->decode($_);
+        $self->update('Task', id => $id, complete => 1);
+    }
+}
+
 =head1 SEE ALSO
 
 L<Jifty>, L<Net::Jifty>