Commit 045dc3ec authored by Leigh B Stoller's avatar Leigh B Stoller
Browse files

Minor bug fix to delegated credentials (previous revision bug).

parent 57d1b59a
...@@ -796,11 +796,11 @@ sub Sign($$) ...@@ -796,11 +796,11 @@ sub Sign($$)
" $cap_xml". $parent_xml . " $cap_xml". $parent_xml .
"</credential>\n"; "</credential>\n";
if (defined($self->{'parent_cred'})) { if (defined($self->{'parent_cred'})) {
$template = "<signed-credential>\n$template\n"; $template = "<signed-credential>\n$template\n<signatures>";
foreach my $sig (@{ $self->{'parent_cred'}->{'signatures'}}) { foreach my $sig (@{ $self->{'parent_cred'}->{'signatures'}}) {
$template .= $sig->toString(); $template .= $sig->toString();
} }
$template .= "</signed-credential>\n"; $template .= "</signatures></signed-credential>\n";
} }
my ($fh, $filename) = tempfile(UNLINK => 0); my ($fh, $filename) = tempfile(UNLINK => 0);
return -1 return -1
......
Supports Markdown
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