pf-tools/pf-tools: cleaning ...

[parmelan-guest at users.alioth.debian.org]

details:   http://hg.debian.org/hg/pf-tools/pf-tools/rev/4cf6aa61f8a3
changeset: 1190:4cf6aa61f8a3
user:      Richard Phan
date:      Tue Jul 16 15:10:48 2013 +0200
description:
cleaning ...

diffstat:

 lib/PFTools/Conf/Host.pm |  23 ++++++++++-------------
 1 files changed, 10 insertions(+), 13 deletions(-)

diffs (62 lines):

diff -r 188f04996e98 -r 4cf6aa61f8a3 lib/PFTools/Conf/Host.pm
--- a/lib/PFTools/Conf/Host.pm	Tue Jul 16 14:02:03 2013 +0200
+++ b/lib/PFTools/Conf/Host.pm	Tue Jul 16 15:10:48 2013 +0200
@@ -164,15 +164,15 @@
             
             foreach my $link (@link_list) {
                 my $new_iface_ref = __build_iface_entry(
-                    {   link_name      => $link,
-                        hostname       => $hostname,
-                        hostnum        => $hostnum,
-                        hostnode       => $hostnode,
-                        host_ref       => $host_ref,
+                    {   link_name     => $link,
+                        hostname      => $hostname,
+                        hostnum       => $hostnum,
+                        hostnode      => $hostnode,
+                        host_ref      => $host_ref,
                         link_list_ref => \@link_list,
-                        site_name      => $site,
-                        site_ref       => $site_part_ref,
-                        pf_config      => $pf_config,
+                        site_name     => $site,
+                        site_ref      => $site_part_ref,
+                        pf_config     => $pf_config,
                     }
                 );
 
@@ -685,7 +685,7 @@
 
 =over
 
-=item I<iface_name> the interface name
+=item I<link_name> the link name
 
 =item I<hostname> the host name
 
@@ -695,7 +695,7 @@
 
 =item I<host_ref> a reference to the I<hostname> host configuration hash
 
-=item I<iface_list_ref> a reference to a list of the interfaces for I<hostname>
+=item I<link_list_ref> a reference to a list of the links for I<hostname>
 
 =item I<site_name> the site name
 
@@ -724,7 +724,6 @@
     my $link_section_ref  = $host_ref->{$link_section_name};
     my $nodes             = $host_ref->{'hostgroup'}->{'nodes'} || 0;
     my $host_number       = $hostnum . ( $hostnode ? $hostnode : q{} );
-    my $iface_list_ref    = __get_host_interfaces($host_ref);
     my @iface_list_ref    = __get_host_interfaces($host_ref);
 
     # Check vlan
@@ -799,8 +798,6 @@
         }
 
         $result->{'slaves'} = join q{ }, @slave_ifaces;
-        #$result->{'mode'} = $iface_section_ref->{"mode.$host_number"}
-        #    || $iface_section_ref->{'mode'};
         $result->{'options'} = $link_section_ref->{"options.$host_number"}
             || $link_section_ref->{'options'};
     }