From a3fbfba4c96c38f375d7026a01a517c324ff5741 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Fernando=20Apestegu=C3=ADa?= <fernape@FreeBSD.org>
Date: Fri, 13 Oct 2023 14:05:25 +0200
Subject: [PATCH] japanese/jacode.pl: Fix use of package separator

Use of ' as a package name separator is deprecated in lang/perl5.38

PR:		274445
Reported by:	takefu@airport.fm
---
 japanese/jacode.pl/Makefile | 5 +++++
 1 file changed, 5 insertions(+)

diff --git a/japanese/jacode.pl/Makefile b/japanese/jacode.pl/Makefile
index ea6f6dbdd223..d7f003018f5a 100644
--- a/japanese/jacode.pl/Makefile
+++ b/japanese/jacode.pl/Makefile
@@ -1,5 +1,6 @@
 PORTNAME=	jacode.pl
 DISTVERSION=	2.13.4.31
+PORTREVISION=	1
 CATEGORIES=	japanese perl5
 MASTER_SITES=	CPAN
 MASTER_SITE_SUBDIR=	CPAN:INA/${PORTNAME:S|j|J|:S|.pl||}
@@ -20,6 +21,10 @@ NO_BUILD=	yes
 PLIST_FILES=	${SITE_PERL_REL}/${PORTNAME}\
 		${SITE_PERL_REL}/${PORTNAME:S|j|J|:S|.pl|.pm|}
 
+pre-patch:
+	@${FIND} ${WRKSRC}/lib/jacode.pl ${WRKSRC}/t -type f -exec\
+		${REINPLACE_CMD} -e "s|jacode'|jacode::|g" -e "s|jcode'|jcode::|g" {} \;
+
 do-install:
 	@${MKDIR} ${STAGEDIR}${PREFIX}/${SITE_PERL_REL}
 	${INSTALL_DATA} ${WRKSRC}/lib/${PORTNAME} ${STAGEDIR}${PREFIX}/${SITE_PERL_REL}/${PORTNAME}