Archived
1
0

Fix format of who tags

This commit is contained in:
Mercier Pierre-Olivier 2014-01-17 00:05:44 +01:00
parent 767a4f9be2
commit 8ddca7c49a

View File

@ -501,8 +501,8 @@ sub toString($$)
if (defined $self->{who}) if (defined $self->{who})
{ {
my $w = $doc->createElement("who"); my $w = $doc->createElement("who");
$w->setAttribute("login", $self->{who}{login});
$w->setAttribute("type", $self->{who}{type}) if (defined $self->{who}{type}); $w->setAttribute("type", $self->{who}{type}) if (defined $self->{who}{type});
$w->appendTextNode( $self->{who}{login} );
$e->appendChild( $w ); $e->appendChild( $w );
} }