Commit 87d06155 authored by Jonathon Duerig's avatar Jonathon Duerig

CreateImage should return URN/URL in AM.

parent 8d81f23a
#!/usr/bin/perl -wT
#
# Copyright (c) 2008-2012 University of Utah and the Flux Group.
# Copyright (c) 2008-2013 University of Utah and the Flux Group.
#
# {{{GENIPUBLIC-LICENSE
#
......@@ -732,13 +732,7 @@ sub CreateImage()
if (defined($options) && exists($options->{'global'}));
my $response = GeniCMV2::CreateImage($args);
if (GeniResponse::IsError($response)) {
return $response;
}
# Return an XML-RPC boolean
my $coder = Frontier::RPC2->new();
return GeniResponse->Create(GENIRESPONSE_SUCCESS, $coder->boolean(1));
return $response;
}
###############################################################################
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment