Date: Thu, 12 Aug 2010 16:54:25 +0900 From: Takefu <takefu@airport.fm> To: freebsd-gnats-submit@FreeBSD.org Subject: ports/149555: japanese/p5-jcode.pl.diff Fix defined(%hash) is deprecated Message-ID: <4C63A8B1.6020907@airport.fm> Resent-Message-ID: <201008120903.o7C93FCF027464@freefall.freebsd.org>
next in thread | raw e-mail | index | archive | help
>Number: 149555 >Category: ports >Synopsis: japanese/p5-jcode.pl.diff Fix defined(%hash) is deprecated >Confidential: no >Severity: non-critical >Priority: low >Responsible: freebsd-ports-bugs >State: open >Quarter: >Keywords: >Date-Required: >Class: sw-bug >Submitter-Id: current-users >Arrival-Date: Thu Aug 12 09:03:15 UTC 2010 >Closed-Date: >Last-Modified: >Originator: Takefu >Release: >Organization: FOX Amateur Radio Club >Environment: >Description: lang/perl5.12 problems occur in combination. z2h_euc z2h_sjis and was out of the way to improve call and message. # fined(%hash) is deprecated at /usr/local/lib/perl5/site_perl/5.12.1/jcode.pl line 684. # (Maybe you should just omit the defined()?) # defined(%hash) is deprecated at /usr/local/lib/perl5/site_perl/5.12.1/jcode.pl line 693. # (Maybe you should just omit the defined()?) >How-To-Repeat: #!/usr/local/bin/perl require "jcode.pl"; $data = ""; jcode::z2h_sjis(\$data); exit; >Fix: --- p5-jcode.pl.diff begins here --- diff -ruN /usr/ports/japanese/p5-jcode.pl/Makefile japanese/p5-jcode.pl/Makefile --- /usr/ports/japanese/p5-jcode.pl/Makefile 2010-07-21 16:56:11.000000000 +0900 +++ japanese/p5-jcode.pl/Makefile 2010-07-29 12:51:26.000000000 +0900 @@ -7,20 +7,23 @@ PORTNAME= jcode.pl PORTVERSION= 2.13 -CATEGORIES= japanese perl5 +PORTREVISION= 1 +CATEGORIES?= japanese perl5 MASTER_SITES= ftp://ftp.iij.ad.jp/pub/IIJ/dist/utashiro/perl/ \ ftp://ftp.sra.co.jp/pub/lang/perl/sra-scripts/ EXTRACT_SUFX= # none MAINTAINER= ports@FreeBSD.org -COMMENT= Perl5 library for Japanese character code conversion +COMMENT?= Perl5 library for Japanese character code conversion + +CONFLICTS?= ja-jcode.pl-[0-9]* EXTRACT_CMD= ${CP} EXTRACT_BEFORE_ARGS= EXTRACT_AFTER_ARGS= ${WRKDIR} -NO_WRKSUBDIR= YES -NO_BUILD= YES -USE_PERL5= YES +USE_PERL5= yes +NO_WRKSUBDIR= yes +NO_BUILD= yes PLIST_SUB= INSTALL_BASE=${INSTALL_BASE} INSTALL_BASE= ${SITE_PERL_REL} @@ -28,10 +31,12 @@ .include <bsd.port.pre.mk> +.if !defined(OLD_FLAG) PKGNAMEPREFIX:= ${PKGNAMEPREFIX}p5- +.endif do-install: ${MKDIR} ${INSTALL_DIR} - ${INSTALL_DATA} ${WRKDIR}/${DISTNAME} ${INSTALL_DIR}/jcode.pl + ${INSTALL_DATA} ${WRKDIR}/${DISTNAME} ${INSTALL_DIR}/${PORTNAME} .include <bsd.port.post.mk> diff -ruN /usr/ports/japanese/p5-jcode.pl/files/patch-aa japanese/p5-jcode.pl/files/patch-aa --- /usr/ports/japanese/p5-jcode.pl/files/patch-aa 2010-07-28 15:02:35.000000000 +0900 +++ japanese/p5-jcode.pl/files/patch-aa 2010-07-28 18:36:46.000000000 +0900 @@ -1,5 +1,5 @@ ---- jcode.pl-2.13.orig 2010-07-28 15:02:11.000000000 +0900 -+++ jcode.pl-2.13 2010-07-28 15:02:23.000000000 +0900 +--- jcode.pl-2.13.orig 2010-07-28 14:46:52.000000000 +0900 ++++ jcode.pl-2.13 2010-07-28 14:51:52.000000000 +0900 @@ -681,7 +681,7 @@ sub z2h_euc { diff -ruN /usr/ports/japanese/p5-jcode.pl/pkg-descr japanese/p5-jcode.pl/pkg-descr --- /usr/ports/japanese/p5-jcode.pl/pkg-descr 2010-07-21 16:56:11.000000000 +0900 +++ japanese/p5-jcode.pl/pkg-descr 2010-07-29 11:29:49.000000000 +0900 @@ -1,9 +1,8 @@ -``jcode.pl-2.x'' is a perl library for japanese character code conversion. -It supports translation of each JIS, EUC, Shift JIS texts, and automatically -recognizes the encode-method of the target text files. +jcode.pl is a perl library for japanese character code conversion. +It supports translation of each JIS, EUC, Shift JIS texts, +and automatically recognizes the encode-method of the target text files. To use this, your script should load this library as - + require "jcode.pl"; or + require('jcode.pl'); --- p5-jcode.pl.diff ends here --- >Release-Note: >Audit-Trail: >Unformatted:
Want to link to this message? Use this URL: <https://mail-archive.FreeBSD.org/cgi/mid.cgi?4C63A8B1.6020907>