cvs diff: Diffing .
Index: flow2rrd.pl
===================================================================
RCS file: /u/rse/arc/cvs/ossp/ossp-pkg/flow2rrd/flow2rrd.pl,v
retrieving revision 1.11
diff -u -d -u -d -r1.11 flow2rrd.pl
--- flow2rrd.pl	26 Dec 2004 20:03:35 -0000	1.11
+++ flow2rrd.pl	27 Dec 2004 12:57:33 -0000
@@ -370,7 +370,7 @@
         #   the flow matches them...
         my $matched_total = 0;
         LOOP: foreach my $host (@{$cfg->{'Host'}}) {
-            foreach my $target (grep { $_ !~ m/^-/ } keys(%{$host->{-target}})) {
+            foreach my $target (@{$host->{-target}->{-order}}) {
                 my $matched = 0;
                 my $inbound; $inbound = undef;
                 my $np = $ctx->{-network}->{$host->{-name}.":".$target};