[vhffs-dev] [1551] Removed some useless debug variable.

[subversion@xxxxxxxxxxxxx]

Revision: 1551
Author:   guillaumito
Date:     2010-03-06 01:07:46 +0100 (Sat, 06 Mar 2010)
Log Message:
-----------
Removed some useless debug variable.
Removed the useless test on existence of a file in a set
before removing it.

Modified Paths:
--------------
    trunk/vhffs-robots/src/cron_scheduler.pl

Modified: trunk/vhffs-robots/src/cron_scheduler.pl
===================================================================
--- trunk/vhffs-robots/src/cron_scheduler.pl	2010-03-05 23:53:31 UTC (rev 1550)
+++ trunk/vhffs-robots/src/cron_scheduler.pl	2010-03-06 00:07:46 UTC (rev 1551)
@@ -131,7 +131,7 @@
 		}
 	}
 
-	my ($rh_set, undef, $eh_set) = IO::Select->select($read_set, undef, $read_set, 1);
+	my ($rh_set) = IO::Select->select($read_set, undef, undef, 1);
 	foreach my $rh (@$rh_set) {
 		my $job = $fd2jobs{$rh->fileno};
 		my $cron = $job->{'cron'};
@@ -323,9 +323,7 @@
 	my $pipe = $job->{'pipe'};
 	if( defined $pipe )  {
 		delete $fd2jobs{ $pipe->fileno };
-		if ( $read_set->exists($pipe) ) {
-			$read_set->remove($pipe);
-		}
+		$read_set->remove($pipe);
 		close($pipe);
 	}
 }