Commit 6dc48546 authored by Leigh B Stoller's avatar Leigh B Stoller
Browse files

Add SetPublicURL().

parent c5a431f4
......@@ -282,6 +282,25 @@ sub SetStatus($$)
$self->{'INSTANCE'}->{'status'} = $status;
return 0;
}
sub SetPublicURL($$)
{
my ($self,$url) = @_;
my $safe_url = DBQuoteSpecial($url);
# Must be a real reference.
return -1
if (! ref($self));
my $uuid = $self->uuid();
DBQueryWarn("update apt_instances set public_url=$safe_url ".
"where uuid='$uuid'") or
return -1;
$self->{'INSTANCE'}->{'public_url'} = $url;
return 0;
}
sub SetManifest($$)
{
......
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