Changeset 174


Ignore:
Timestamp:
Aug 24, 2016, 2:57:53 PM (8 years ago)
Author:
g7moreau
Message:
  • Update small check location bug
File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/klask

    r173 r174  
    335335         }
    336336      if ($check_location) {
    337          my ($hostname) = split /\./, $sw->{hostname}, 2;
    338          print "   error location: $sw->{location} =/= $result->{$OID_NUMBER{sysLocation}}\n"
    339             if $result->{$OID_NUMBER{sysLocation}} ne $sw->{location};
     337         my $location = $result->{$OID_NUMBER{sysLocation}};
     338         $location =~ s/^"(.+)"$/$1/;
     339         print "   error location: '$sw->{location}' =/= '$location'\n" if $location ne $sw->{location};
    340340         }
    341341      #$sw->{location} = $result->{"1.3.6.1.2.1.1.6.0"} || $sw->{hostname};
Note: See TracChangeset for help on using the changeset viewer.