[padb-devel] [padb commit] r106 - Run through perltidy to indent r102 nicely.

[codesite-noreply at google.com]

Author: apittman
Date: Wed Jul 15 12:54:33 2009
New Revision: 106

Modified:
    branches/full-duplex/src/padb

Log:
Run through perltidy to indent r102 nicely.


Modified: branches/full-duplex/src/padb
==============================================================================
--- branches/full-duplex/src/padb	(original)
+++ branches/full-duplex/src/padb	Wed Jul 15 12:54:33 2009
@@ -6435,9 +6435,8 @@
      foreach my $proc ( @{$list} ) {
          my $vp  = $proc->{vp};
          my $pid = $proc->{pid};
-        my $res =
-          $allfns{ $cmd->{mode} }{handler}( $cmd->{cargs}, $vp, $pid );
-	$gres{$vp} = $res if ( defined $res );
+        my $res = $allfns{ $cmd->{mode} }{handler}( $cmd->{cargs}, $vp,  
$pid );
+        $gres{$vp} = $res if ( defined $res );
      }
      return if not %gres;
      return \%gres;
@@ -6637,11 +6636,11 @@
      } else {
          $res = default_handler_all( $cmd, $pid_list );
      }
-    if ( $res ) {
-	$netdata->{target_responce} = $res;
-	$netdata->{all_replys}{target_responce} = $res;
+    if ($res) {
+        $netdata->{target_responce} = $res;
+        $netdata->{all_replys}{target_responce} = $res;
      }
-
+
      return;
  }