X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;f=FS%2FFS%2FMason.pm;h=877864eee9f4e8d87c6656cd6b88b52f1a11b3bc;hb=df2b4d94d5eaef3e9635d7a519fa297d017d42ea;hp=1918d9d36151a31bb2aecf617ac347ed712a3948;hpb=9ecb64360568b205334ae23e1051249cb56491b6;p=freeside.git diff --git a/FS/FS/Mason.pm b/FS/FS/Mason.pm index 1918d9d36..877864eee 100644 --- a/FS/FS/Mason.pm +++ b/FS/FS/Mason.pm @@ -80,7 +80,9 @@ Initializes the Mason environment, loads all Freeside and RT libraries, etc. use NetAddr::IP; use Net::Ping; use Net::Ping::External; - #if CPAN #7815 ever gets fixed# if ( $Net::Ping::External::VERSION <= 0.12 ) { + #if CPAN #7815 ever gets fixed# if ( $Net::Ping::External::VERSION <= 0.12 ) + { + no warnings 'redefine'; eval 'sub Net::Ping::External::_ping_linux { my %args = @_; my $command = "ping -s $args{size} -c $args{count} -w $args{timeout} $args{host}"; @@ -88,7 +90,7 @@ Initializes the Mason environment, loads all Freeside and RT libraries, etc. } '; die $@ if $@; - #} + } use String::Approx qw(amatch); use Chart::LinesPoints; use Chart::Mountain;