[Bps-public-commit] r10259 - in dashboard: hiveminder/newtask

[sartak at bestpractical.com]

Author: sartak
Date: Mon Jan  7 16:15:17 2008
New Revision: 10259

Modified:
   dashboard/   (props changed)
   dashboard/hiveminder/newtask/HiveminderNewTask.js

Log:
 r49944 at onn:  sartak | 2008-01-07 16:14:49 -0500
 It actually works now, mostly. Report task creation/failure


Modified: dashboard/hiveminder/newtask/HiveminderNewTask.js
==============================================================================
--- dashboard/hiveminder/newtask/HiveminderNewTask.js	(original)
+++ dashboard/hiveminder/newtask/HiveminderNewTask.js	Mon Jan  7 16:15:17 2008
@@ -70,7 +70,7 @@
     var email    = widget.preferenceForKey("hiveminderEmail");
     var password = widget.preferenceForKey("hiveminderPassword");
 
-    var perl = "eval { require Net::Hiveminder; 1 } or do { print 'You do not have Net::Hiveminder.'; exit }; my $hm = Net::Hiveminder->new(email => '" + email + "', password => '" + password + "'); my $task = <DATA>; $hm->create_task($task);\n__END__\n" + form.newtask.value;
+    var perl = "eval { require Net::Hiveminder; 1 } or do { print 'You do not have Net::Hiveminder.'; exit }; my $hm = Net::Hiveminder->new(email => '" + email + "', password => '" + password + "'); my $task = <DATA>; print defined($hm->create_task($task)->{summary}) ? 'Task created!' : 'Task creation failed.';\n__END__\n" + form.newtask.value;
 
     results("Creating...");