Merge pull request #48 from seanchrismurphy/patch-1

leeper · leeper · commit a059ba812781 · 2014-07-03T10:02:24.000+02:00
Fix keypair bug in ApproveAllAssignments.R
diff --git a/R/ApproveAllAssignments.R b/R/ApproveAllAssignments.R
@@ -28,7 +28,7 @@ function (hit = NULL, hit.type = NULL, feedback = NULL,
                         GetAssignments(hit = i, return.all = TRUE, keypair = keypair,
                         log.requests = log.requests, sandbox = sandbox)$AssignmentId })
     }
-    request <- ApproveAssignments(keypair, assignments, feedback = feedback,
+    request <- ApproveAssignments(keypair = keypair, assignments, feedback = feedback,
                 print = print, log.requests = log.requests, 
                 sandbox = sandbox, validation.test = validation.test)
     return(request)

Original file line number	Diff line number	Diff line change
`@@ -28,7 +28,7 @@ function (hit = NULL, hit.type = NULL, feedback = NULL,`
`28`	`28`	`GetAssignments(hit = i, return.all = TRUE, keypair = keypair,`
`29`	`29`	`log.requests = log.requests, sandbox = sandbox)$AssignmentId })`
`30`	`30`	`}`
`31`		`- request <- ApproveAssignments(keypair, assignments, feedback = feedback,`
	`31`	`+ request <- ApproveAssignments(keypair = keypair, assignments, feedback = feedback,`
`32`	`32`	`print = print, log.requests = log.requests,`
`33`	`33`	`sandbox = sandbox, validation.test = validation.test)`
`34`	`34`	`return(request)`