This should fix another 31 instances of 

  Unescaped left brace in regex is deprecated here (and will be
  fatal in Perl 5.32)

in a bulk build.

ok?

Index: Makefile
===================================================================
RCS file: /cvs/ports/textproc/texi2html/Makefile,v
retrieving revision 1.27
diff -u -p -r1.27 Makefile
--- Makefile    18 Sep 2015 13:29:15 -0000      1.27
+++ Makefile    3 Apr 2019 06:04:00 -0000
@@ -3,6 +3,7 @@
 COMMENT=       texinfo to HTML converter
 
 DISTNAME=      texi2html-5.0
+REVISION=      0
 CATEGORIES=    textproc
 
 HOMEPAGE=      http://www.nongnu.org/texi2html/
Index: patches/patch-texi2html_pl
===================================================================
RCS file: /cvs/ports/textproc/texi2html/patches/patch-texi2html_pl,v
retrieving revision 1.2
diff -u -p -r1.2 patch-texi2html_pl
--- patches/patch-texi2html_pl  18 Sep 2015 13:29:15 -0000      1.2
+++ patches/patch-texi2html_pl  3 Apr 2019 06:04:00 -0000
@@ -1,6 +1,7 @@
 $OpenBSD: patch-texi2html_pl,v 1.2 2015/09/18 13:29:15 ajacoutot Exp $
---- texi2html.pl.orig  Thu Jul  1 00:01:27 2010
-+++ texi2html.pl       Fri Sep 18 09:26:30 2015
+Index: texi2html.pl
+--- texi2html.pl.orig
++++ texi2html.pl
 @@ -1,7 +1,5 @@
  #! @PERL@ --
  # perl
@@ -18,3 +19,12 @@ $OpenBSD: patch-texi2html_pl,v 1.2 2015/
  
  # for POSIX::setlocale and File::Spec
  require 5.00405;
+@@ -5609,7 +5605,7 @@ sub common_misc_commands($$$$)
+     }
+     elsif ($command eq 'clickstyle')
+     {
+-        if ($line =~ s/^\s+@([^\s\{\}\@]+)({})?\s*//)
++        if ($line =~ s/^\s+@([^\s\{\}\@]+)(\{})?\s*//)
+         {
+             $Texi2HTML::THISDOC{$command} = $1;
+             # FIXME warn about what remains on the line?
-- 
Christian "naddy" Weisgerber                          [email protected]

Reply via email to