[popfile-commit] engine popfile.pl,1.203,1.204

[<jgr...@us...>]

Update of /cvsroot/popfile/engine
In directory sc8-pr-cvs1:/tmp/cvs-serv32719

Modified Files:
	popfile.pl 
Log Message:
Check that the pipe handle is valid in pipeready

Index: popfile.pl
===================================================================
RCS file: /cvsroot/popfile/engine/popfile.pl,v
retrieving revision 1.203
retrieving revision 1.204
diff -C2 -d -r1.203 -r1.204
*** popfile.pl	24 Feb 2003 23:08:45 -0000	1.203
--- popfile.pl	25 Feb 2003 22:17:40 -0000	1.204
***************
*** 101,104 ****
--- 101,110 ----
  	my ( $pipe ) = @_;
  
+ 	# Check that the $pipe is still a valid handle
+ 	
+ 	if ( !defined( $pipe ) ) {
+ 		return 0;
+ 	}
+ 
  	if ( $on_windows ) {