Trace printer handles <who/> tags
This commit is contained in:
parent
24df9247e7
commit
767a4f9be2
@ -498,6 +498,14 @@ sub toString($$)
|
||||
$e->setAttribute("id", $self->{id});
|
||||
$e->setAttribute("type", $self->{type});
|
||||
|
||||
if (defined $self->{who})
|
||||
{
|
||||
my $w = $doc->createElement("who");
|
||||
$w->setAttribute("login", $self->{who}{login});
|
||||
$w->setAttribute("type", $self->{who}{type}) if (defined $self->{who}{type});
|
||||
$e->appendChild( $w );
|
||||
}
|
||||
|
||||
for my $k (keys %{ $self->{values} })
|
||||
{
|
||||
my $v = $doc->createElement("value");
|
||||
|
Reference in New Issue
Block a user