Organizations should an argument from the call method

[frankcorneliusmartin]

So that you are able to send the task to a subsection of your collaboration:

vtg/R/client.R

Lines 480 to 490 in 4c5fe9f

	for (i in 1:length(self$collaboration$organizations)) {
	org <- self$collaboration$organizations[[i]]
	if (self$using_encryption) {
	# Returns a string containing 3 base64 encoded components, separated by
	# a '$':
	# 1: (RSA) encrypted key,
	# 2: initialization vector (iv),
	# 3: (AES) encrypted body
	input <- self$encrypt(serialized.input, org)