Close some filehandles that aren't needed

git-svn-id: https://svn.code.sf.net/p/xcat/code/xcat-core/branches/2.7@12880 8638fb3e-16cb-4fca-ae20-7b5d299a9bcd

xCAT-server/sbin/xcatd

@@ -1452,11 +1452,13 @@ sub dispatch_request {
        $dispatch_children++;
        $dispatched_children{$child}=1;
        $child_fdset->add($pfd);
+	close($parfd);
        next;
     }
     unless (defined $child) {
        $dispatch_cb->({error=>['Fork failure dispatching request'],errorcode=>[1]});
     }
+    close($pfd);
     $SIG{CHLD}='DEFAULT';
       $dispatch_parentfd = $parfd;
       my @prexcatdests=();