package GLPI::Agent::SOAP::WsMan::DataLocale;

use strict;
use warnings;

use GLPI::Agent::SOAP::WsMan::Node;

## no critic (ProhibitMultiplePackages)
package
    DataLocale;

use parent
    'Node';

use GLPI::Agent::SOAP::WsMan::Attribute;

use constant    xmlns   => 'p';

sub new {
    my ($class, $locale) = @_;

    my $self = $class->SUPER::new(
        Attribute->must_understand("false"),
        Attribute->new( "xml:lang" => $locale),
    );

    bless $self, $class;
    return $self;
}

1;
