Skip to content
GitLab
Projects
Groups
Snippets
/
Help
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Contribute to GitLab
Sign in / Register
Toggle navigation
Menu
Open sidebar
emulab
emulab-devel
Commits
ca8b6603
Commit
ca8b6603
authored
Jan 06, 2017
by
Leigh B Stoller
Browse files
Make sure we delete local webtask for snapshot.
parent
149e10da
Changes
1
Hide whitespace changes
Inline
Side-by-side
apt/manage_profile.in
View file @
ca8b6603
...
...
@@ -665,6 +665,9 @@ $project->SendEmail($portalLogs, "New Profile Created",
"
UUID:
"
.
$profile
->
uuid
()
.
"
\n
"
.
"
URL:
"
.
$profile
->
AdminURL
()
.
"
\n
");
# Make sure we delete Anonymous webtask,
$webtask
->
Delete
()
if
(
defined
(
$webtask
)
&&
!
defined
(
$webtask_id
));
exit
(
0
);
sub
fatal
($)
...
...
@@ -672,8 +675,14 @@ sub fatal($)
my
(
$mesg
)
=
@_
;
if
(
defined
(
$webtask
))
{
$webtask
->
output
(
$mesg
);
$webtask
->
Exited
(
-
1
);
# Anonymous webtask, delete.
if
(
!
defined
(
$webtask_id
))
{
$webtask
->
Delete
();
}
else
{
$webtask
->
output
(
$mesg
);
$webtask
->
Exited
(
-
1
);
}
}
print
STDERR
"
*** $0:
\n
"
.
"
$mesg
\n
";
...
...
@@ -707,6 +716,10 @@ sub UserError(;$)
$webtask
->
output
(
$xml
);
}
else
{
# Anonymous webtask, delete.
if
(
defined
(
$webtask
))
{
$webtask
->
Delete
();
}
foreach
my
$key
(
keys
(
%errors
))
{
print
"
$key
:
"
.
$errors
{
$key
}
.
"
\n
";
}
...
...
Write
Preview
Supports
Markdown
0%
Try again
or
attach a new file
.
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment