Title: [opsview] [9670] Don't use deprecated form of isa.
- Revision
- 9670
- Author
- pknight
- Date
- 2012-07-31 11:36:35 +0100 (Tue, 31 Jul 2012)
Log Message
Don't use deprecated form of isa.
Modified Paths
Modified: trunk/opsview-core/nagios-plugins/check_aws_ec2
===================================================================
--- trunk/opsview-core/nagios-plugins/check_aws_ec2 2012-07-31 10:28:53 UTC (rev 9669)
+++ trunk/opsview-core/nagios-plugins/check_aws_ec2 2012-07-31 10:36:35 UTC (rev 9670)
@@ -25,7 +25,6 @@
use Nagios::Plugin;
use Net::Amazon::EC2;
use Data::Dump qw(dump);
-use UNIVERSAL 'isa';
#valid states array
my @valid_states = (
@@ -115,7 +114,7 @@
#print dump($running_instances{owner_id});
#API return error message as HASH if authorisation failed
-if ( isa( $running_instances, 'Net::Amazon::EC2::Errors' ) ) {
+if ( $running_instances->isa('Net::Amazon::EC2::Errors') ) {
$np->nagios_exit( UNKNOWN, "Authorisation failed - check access keys" );
}
if ( !$np->opts->indexk ) {
Modified: trunk/opsview-core/nagios-plugins/check_aws_ec2_instances
===================================================================
--- trunk/opsview-core/nagios-plugins/check_aws_ec2_instances 2012-07-31 10:28:53 UTC (rev 9669)
+++ trunk/opsview-core/nagios-plugins/check_aws_ec2_instances 2012-07-31 10:36:35 UTC (rev 9670)
@@ -24,7 +24,6 @@
use Nagios::Plugin;
use Net::Amazon::EC2;
use Data::Dump qw(dump);
-use UNIVERSAL 'isa';
my $np = Nagios::Plugin->new(
shortname => "AMAZON EC2 INSTANCES",
@@ -94,7 +93,7 @@
}
#API return error message as HASH if authorisation failed
-if ( isa( $running_instances, 'Net::Amazon::EC2::Errors' ) ) {
+if ( $running_instances->isa('Net::Amazon::EC2::Errors') ) {
$np->nagios_exit( UNKNOWN, "Authorisation failed - check access keys" );
}
my @index_list;
_______________________________________________
Opsview-checkins mailing list
[email protected]
http://lists.opsview.org/lists/listinfo/opsview-checkins
