From: Stephen L Johnson Date: Fri, 10 May 2002 21:07:43 +0000 (+0000) Subject: change DFIGNORE checks to use m{} to slashes '/' can be used in file system names X-Git-Tag: spong-2_7_7~6 X-Git-Url: http://git.etc.gen.nz/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=86b07a3f5445c88d49f7a25083ac0ac6098a6392;p=spong.git change DFIGNORE checks to use m{} to slashes '/' can be used in file system names --- diff --git a/src/lib/Spong/Client/plugins/check_disk b/src/lib/Spong/Client/plugins/check_disk index f5adebc..94a2c34 100755 --- a/src/lib/Spong/Client/plugins/check_disk +++ b/src/lib/Spong/Client/plugins/check_disk @@ -4,7 +4,7 @@ $CHECKFUNCS{'disk'} = \&check_disk; # This check check the amount of free diskspace for all of the mounted disk # partitions and the the amount of free swapspace. -# $Id: check_disk,v 1.4 2001/09/28 19:20:18 sljohnson Exp $ +# $Id: check_disk,v 1.5 2002/05/10 21:07:43 sljohnson Exp $ use Spong::SafeExec qw(safe_exec); @@ -26,8 +26,8 @@ sub check_disk { my $warn = $DFWARN{$name} || $DFWARN{$rawfs} || $DFWARN{"ALL"}; foreach $check ( @DFIGNORE ) { - next DFPIPE if $rawfs =~ /$check/; - next DFPIPE if $name =~ /$check/; + next DFPIPE if $rawfs =~ m{$check}; + next DFPIPE if $name =~ m{$check}; } if( $percent > $lpercent ) { $lpercent = $percent; $large = $name; }