projects
/
freeside.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
|
inline
| side by side (parent:
551634e
)
quiet warning: Subroutine Net::Ping::External::_ping_linux redefined
author
ivan
<ivan>
Wed, 16 Sep 2009 00:52:23 +0000
(
00:52
+0000)
committer
ivan
<ivan>
Wed, 16 Sep 2009 00:52:23 +0000
(
00:52
+0000)
FS/FS/Mason.pm
patch
|
blob
|
history
diff --git
a/FS/FS/Mason.pm
b/FS/FS/Mason.pm
index
1918d9d
..
877864e
100644
(file)
--- 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;
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}";
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 $@;
}
';
die $@ if $@;
-
#
}
+ }
use String::Approx qw(amatch);
use Chart::LinesPoints;
use Chart::Mountain;
use String::Approx qw(amatch);
use Chart::LinesPoints;
use Chart::Mountain;