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 ) {
|
