Namazu-devel-ja(旧)
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
Re: (codeconv.pl) LANG=ja, perl -d:DProf で中身が処理されない
> 千葉市中央区長洲
> 藤原 誠
こちらの方法の方が、まわりくどいですが、まだましの気がします。
本当は
@$contref = NKF::nkf($nkf_opt, $$contref);
ってやればいいのだろうけれど、これは
Not an ARRAY reference at ...../pl/codeconv.pl line 137,
と言われてしまいますし。
大切なことがあって、この変更だけで NMZ.p* が出来るようになり
ます。LANG=ja の時に問題があるというのは、本当はここ(だけ)が問
題だったのです。だとすると LANG の説明は付きます。
---
(藤原)
http://www.ki.nu/software/namazu/tutorial
Index: pl/codeconv.pl
===================================================================
RCS file: /storage/cvsroot/namazu/pl/codeconv.pl,v
retrieving revision 1.11.8.3
diff -u -r1.11.8.3 codeconv.pl
--- pl/codeconv.pl 9 Jul 2003 15:19:33 -0000 1.11.8.3
+++ pl/codeconv.pl 29 Jul 2003 12:52:38 -0000
@@ -134,7 +134,10 @@
my $nkf_opt = "-emXZ1";
if ($var::USE_NKF_MODULE) {
- $$contref = NKF::nkf($nkf_opt, $$contref);
+ my @result;
+ my $resultref = \@result; # fix for the problem at perl -d:DProf
+ $resultref = $contref;
+ @result = NKF::nkf($nkf_opt, $$contref);
} else {
my $nkftmp = util::tmpnam("NMZ.nkf");
{