Fix another case of defined %hash.

[catagits/fcgi2.git] / perl / FCGI.PL

diff --git a/perl/FCGI.PL b/perl/FCGI.PL
index a7a4973..5c09a08 100644 (file)
--- a/perl/FCGI.PL
+++ b/perl/FCGI.PL
@@ -313,7 +313,7 @@ sub accept() {
 
 sub finish() {
     warn "finish called as a method; you probably wanted to call Finish" if @_;
-    %ENV = %FCGI::ENV if (defined %FCGI::ENV);
+    %ENV = %FCGI::ENV if %FCGI::ENV;
 
     # not SFIO
     if (tied (*STDIN)) {