[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[debian-users:36232] Re: set-language-env について



久保田さん、

早速御親切なフォローを有難うございました。
perlはさっぱりやったことがないのですが、general.pl見てみましたら
確かに入れ子がおかしいですね。

修正後勿論作動しました。

重ねて有難うございました。

--
うーん、これだからDebianから愈々離れられません :-)
山田

At 16:43 03/02/09 +0900, you wrote:
>久保田です。
>
>From: Kohjin Yamada <jr1ede@xxxxxxxxxxxxxxx>
>Subject: [debian-users:36223] Re: set-language-env について
>Date: Sun, 9 Feb 2003 10:29:03 +0900
>
>> language-env 0.43 をアップロードして頂いたとのことですが
>> apt-getしましたが未だ0.42です。URL教えて下さいませんか?
>> http://www.debian.or.jp/~kubota/ を見せて頂きましたのですが所在が不明なん
です。
>
>武藤さんの回答の通りですが、そのあいだ単に待ってるだけというのも
>なんでしょうから、パッチを添付します。
>
>このパッチは、/usr/share/language-env/general.pl に適用してください。
>パッチの使い方が分からなければ、general.pl の80行目のいちばん最後の
>「}」をエディタで削除してください。
>
>また、もし version 0.41 がどこかに転がっていたら、それを使うという
>のもひとつの手です。0.41 と 0.42 によって設定が変わるのは、韓国語
>だけですので。
>
>---
>久保田智広 Tomohiro KUBOTA <kubota@debian.org>
>http://www.debian.or.jp/~kubota/
>--- language-env-0.42/general.pl	2003-02-04 00:03:17.000000000 +0900
>+++ language-env-0.43/general.pl	2003-02-09 07:18:24.000000000 +0900
>@@ -77,7 +77,7 @@
> 	}
> 	if ($DEFAULT) {
> 		if ($_[2]) {print STDERR $Lang::yes_upper,"\n"; return 1;}
>-		print STDERR $Lang::no_upper,"\n"; return 0;}
>+		print STDERR $Lang::no_upper,"\n"; return 0;
> 	}
> 	$a = <STDIN>; chomp($a);
> 	if ($a eq $Lang::yes_upper || $a eq $Lang::yes_lower) {return 1;}