projects
/
freeside.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
|
inline
| side by side (parent:
aab97b9
)
fix error on port view when you haven't selected a torrus serviceid yet
author
ivan
<ivan>
Sat, 26 Feb 2011 02:13:20 +0000
(
02:13
+0000)
committer
ivan
<ivan>
Sat, 26 Feb 2011 02:13:20 +0000
(
02:13
+0000)
FS/FS/NetworkMonitoringSystem/Torrus_Internal.pm
patch
|
blob
|
history
diff --git
a/FS/FS/NetworkMonitoringSystem/Torrus_Internal.pm
b/FS/FS/NetworkMonitoringSystem/Torrus_Internal.pm
index
4c3264e
..
985b1be
100644
(file)
--- a/
FS/FS/NetworkMonitoringSystem/Torrus_Internal.pm
+++ b/
FS/FS/NetworkMonitoringSystem/Torrus_Internal.pm
@@
-72,7
+72,7
@@
sub port_graphs_link {
# hardcoded for 'main' tree for now
my $self = shift;
my $serviceid = shift;
# hardcoded for 'main' tree for now
my $self = shift;
my $serviceid = shift;
- my $hash = $self->get_router_serviceids(undef,$serviceid);
+ my $hash = $self->get_router_serviceids(undef,$serviceid)
or return ''
;
my @keys = keys %$hash; # yeah this is weird...
my $host = $keys[0];
my $iface = $hash->{$keys[0]};
my @keys = keys %$hash; # yeah this is weird...
my $host = $keys[0];
my $iface = $hash->{$keys[0]};
@@
-205,7
+205,6
@@
sub _torrus_newddx {
print $new $ddx;
close $new;
print $new $ddx;
close $new;
- # `date ...` created file names with weird chars in them
my $tmpname = $ddxfile . Date::Format::time2str('%Y%m%d%H%M%S',time);
rename("$ddxfile", $tmpname) or die $!;
rename("$ddxfile.new", $ddxfile) or die $!;
my $tmpname = $ddxfile . Date::Format::time2str('%Y%m%d%H%M%S',time);
rename("$ddxfile", $tmpname) or die $!;
rename("$ddxfile.new", $ddxfile) or die $!;
@@
-216,7
+215,8
@@
sub _torrus_newddx {
sub _torrus_reload {
my($self) = @_;
sub _torrus_reload {
my($self) = @_;
- #i should use IPC::Run and have better error checking
+ #i should use IPC::Run and have better error checking (commands are silent
+ # for success, or output errors)
system('torrus', 'devdiscover', "--in=$ddxfile");
system('torrus', 'devdiscover', "--in=$ddxfile");