Here is a small diff that unbreaks the www/fcgi build with Perl 5.28.

This port has no regression tests.

Charlène. 

Index: Makefile
===================================================================
RCS file: /cvs/ports/www/fcgi/Makefile,v
retrieving revision 1.30
diff -u -p -u -p -r1.30 Makefile
--- Makefile    24 Oct 2018 14:28:11 -0000      1.30
+++ Makefile    27 Jan 2019 21:46:02 -0000
@@ -3,7 +3,7 @@
 COMMENT=               FastCGI Development Kit
 
 DISTNAME=              fcgi-2.4.0
-REVISION =             15
+REVISION =             16
 CATEGORIES=            www
 SHARED_LIBS += fcgi                 0.0      # .0.0
 SHARED_LIBS += fcgi++               1.0      # .1.0
Index: patches/patch-perl_FCGI_PL
===================================================================
RCS file: /cvs/ports/www/fcgi/patches/patch-perl_FCGI_PL,v
retrieving revision 1.2
diff -u -p -u -p -r1.2 patch-perl_FCGI_PL
--- patches/patch-perl_FCGI_PL  28 Mar 2011 23:04:42 -0000      1.2
+++ patches/patch-perl_FCGI_PL  27 Jan 2019 21:46:02 -0000
@@ -1,7 +1,17 @@
 $OpenBSD: patch-perl_FCGI_PL,v 1.2 2011/03/28 23:04:42 simon Exp $
---- perl/FCGI.PL.orig  Sun Dec 15 21:02:48 2002
-+++ perl/FCGI.PL       Wed Mar  9 13:41:41 2011
-@@ -291,7 +291,7 @@ sub Request(;***$*$) {
+Index: perl/FCGI.PL
+--- perl/FCGI.PL.orig
++++ perl/FCGI.PL
+@@ -1,6 +1,8 @@
+ use Config;
+ use ExtUtils::MakeMaker;
+ 
++BEGIN { push @INC, '.'; }
++
+ do 'FCGI.cfg' or die "no FCGI.cfg";
+ 
+ open OUT, ">FCGI.pm";
+@@ -291,7 +293,7 @@ sub Request(;***$*$) {
  
  sub accept() {
      warn "accept called as a method; you probably wanted to call Accept" if 
@_;
@@ -10,7 +20,7 @@ $OpenBSD: patch-perl_FCGI_PL,v 1.2 2011/
        %ENV = %FCGI::ENV;
      } else {
        %FCGI::ENV = %ENV;
-@@ -310,7 +310,7 @@ sub accept() {
+@@ -310,7 +312,7 @@ sub accept() {
  
  sub finish() {
      warn "finish called as a method; you probably wanted to call Finish" if 
@_;
@@ -19,7 +29,7 @@ $OpenBSD: patch-perl_FCGI_PL,v 1.2 2011/
  
      # not SFIO
      if (tied (*STDIN)) {
-@@ -393,7 +393,7 @@ sub OPEN {
+@@ -393,7 +395,7 @@ sub OPEN {
  # Apparently some use fileno to determine if a filehandle is open,
  # so we might want to return a defined, but meaningless value.
  # An alternative would be to return the fcgi stream fd.

Reply via email to