[Resmon-devel] [resmon commit] r354 - branches/resmon2/lib/Core/Pf

svn-commit at lists.omniti.com svn-commit at lists.omniti.com
Wed May 5 23:36:10 EDT 2010


Author: jdixon
Date: 2010-05-05 23:36:10 -0400 (Wed, 05 May 2010)
New Revision: 354

Modified:
   branches/resmon2/lib/Core/Pf/Queues.pm
   branches/resmon2/lib/Core/Pf/Status.pm
Log:
catch permissions fail

Modified: branches/resmon2/lib/Core/Pf/Queues.pm
===================================================================
--- branches/resmon2/lib/Core/Pf/Queues.pm	2010-05-06 03:22:43 UTC (rev 353)
+++ branches/resmon2/lib/Core/Pf/Queues.pm	2010-05-06 03:36:10 UTC (rev 354)
@@ -60,7 +60,7 @@
     my $self = shift;
     my $config = $self->{'config'};
     my $pfctl_path = $config->{'pfctl_path'} || 'pfctl';
-    my $output = run_command("$pfctl_path -vsq");
+    my $output = run_command("$pfctl_path -vsq") || die "Unable to execute: $pfctl_path";
     my $osname = $^O;
     my %metrics;
 

Modified: branches/resmon2/lib/Core/Pf/Status.pm
===================================================================
--- branches/resmon2/lib/Core/Pf/Status.pm	2010-05-06 03:22:43 UTC (rev 353)
+++ branches/resmon2/lib/Core/Pf/Status.pm	2010-05-06 03:36:10 UTC (rev 354)
@@ -89,7 +89,7 @@
     my $self = shift;
     my $config = $self->{'config'};
     my $pfctl_path = $config->{'pfctl_path'} || 'pfctl';
-    my $output = run_command("$pfctl_path -si");
+    my $output = run_command("$pfctl_path -si") || die "Unable to execute: $pfctl_path";
     my $osname = $^O;
     my %metrics;
     my %keys = (



More information about the Resmon-devel mailing list