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

sartak at bestpractical.com sartak at bestpractical.com
Sat Jan 12 22:50:14 EST 2008


Author: sartak
Date: Sat Jan 12 22:50:14 2008
New Revision: 10298

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

Log:
 r50237 at onn:  sartak | 2008-01-12 22:49:30 -0500
 More little fixes


Modified: Net-Hiveminder/bin/sync_tasks
==============================================================================
--- Net-Hiveminder/bin/sync_tasks	(original)
+++ Net-Hiveminder/bin/sync_tasks	Sat Jan 12 22:50:14 2008
@@ -9,7 +9,7 @@
 my $hm = Net::Hiveminder->new(use_config => 1);
 
 # update any tasks with the changes you've made
-$hm->upload_file($file)
+print $hm->upload_file($file), "\n"
     if -e $file;
 
 # and sync your file with any other changes made

Modified: Net-Hiveminder/lib/Net/Hiveminder.pm
==============================================================================
--- Net-Hiveminder/lib/Net/Hiveminder.pm	(original)
+++ Net-Hiveminder/lib/Net/Hiveminder.pm	Sat Jan 12 22:50:14 2008
@@ -194,7 +194,7 @@
     return $self->read(Task => id => $id);
 }
 
-=head2 update_task lOCATOR, ARGS
+=head2 update_task LOCATOR, ARGS
 
 Update task C<LOCATOR> with C<ARGS>.
 
@@ -281,8 +281,9 @@
 
 sub download_text {
     my $self = shift;
+    my $query = shift;
 
-    return $self->act(DownloadTasks => query => 'not/complete/starts/before/tomorrow/accepted/but_first/nothing', format => 'sync')->{content}{result};
+    return $self->act(DownloadTasks => query => $query, format => 'sync')->{content}{result};
 }
 
 =head2 download_file FILENAME



More information about the Bps-public-commit mailing list