source: ocsinventory-agent/trunk/fuentes/lib/Ocsinventory/Agent/XML/Response/Inventory.pm @ 468

Last change on this file since 468 was 468, checked in by mabarracus, 4 years ago

Copyt trusty code

File size: 568 bytes
Line 
1package Ocsinventory::Agent::XML::Response::Inventory;
2
3use strict;
4use Ocsinventory::Agent::XML::Response;
5our @ISA = ('Ocsinventory::Agent::XML::Response');
6
7sub new {
8    my ($class, @params) = @_;
9
10    my $this = $class->SUPER::new(@params);
11    bless ($this, $class);
12
13    my $parsedContent = $this->getParsedContent(['ACCOUNTINFO']);
14    if ($parsedContent && exists ($parsedContent->{RESPONSE}) && $parsedContent->{RESPONSE} =~ /^ACCOUNT_UPDATE$/) {
15      $this->{accountinfo}->writeAccountInfoFile($parsedContent->{ACCOUNTINFO});
16    }
17    return $this;
18}
19
201;
Note: See TracBrowser for help on using the repository browser.