* version 1.3.2-beta1
authortrondham <trondham@e53b7cee-c147-0410-b3a0-ae4c1fa63963>
Thu, 6 Jan 2011 17:03:45 +0000 (17:03 +0000)
committertrondham <trondham@e53b7cee-c147-0410-b3a0-ae4c1fa63963>
Thu, 6 Jan 2011 17:03:45 +0000 (17:03 +0000)
* Bugfix for primary slave when using procfs

git-svn-id: svn+ssh://vcs-usit.uio.no/svnroot/usit-unix-intern/trunk/usit-nagios-plugins/trondham/check_linux_bonding@18955 e53b7cee-c147-0410-b3a0-ae4c1fa63963

check_linux_bonding

index 88a1810..11f0d55 100755 (executable)
@@ -43,7 +43,7 @@ $SIG{__WARN__} = sub { push @perl_warnings, [@_]; };
 
 # Version and similar info
 $NAME    = 'check_linux_bonding';
-$VERSION = '1.3.1';
+$VERSION = '1.3.2-beta1';
 $AUTHOR  = 'Trond H. Amundsen';
 $CONTACT = 't.h.amundsen@usit.uio.no';
 
@@ -371,8 +371,8 @@ sub find_bonding_procfs {
                }
            }
            # get primary slave
-           elsif (m{\A Primary \s Slave: \s (.+) \z}xms) {
-               chop($bonding{$b}{primary} = $1);
+           elsif (m{\A Primary \s Slave: \s (\S+) .* \z}xms) {
+               chomp($bonding{$b}{primary} = $1);
            }
            # get active slave
            elsif (m{\A Currently \s Active \s Slave: \s (.+) \z}xms) {