diff options
| author | Chinese Language Team <chinese> | 1999-06-17 00:17:26 +0000 |
|---|---|---|
| committer | Chinese Language Team <chinese> | 1999-06-17 00:17:26 +0000 |
| commit | ee5d97fa782457a329fd53182ec2b765d5568934 (patch) | |
| tree | 1050f098bf5a599d377f579cc9498f1a75623d00 | |
| parent | 1b08468a1509dc58b59ff090afa2c21126cdb264 (diff) | |
Bug fix. -ypwong
CVS version numbers
chinese/bin/tocn.pl: 1.2 -> 1.3
| -rwxr-xr-x | chinese/bin/tocn.pl | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/chinese/bin/tocn.pl b/chinese/bin/tocn.pl index 1484c4ffdd7..55fae94d1de 100755 --- a/chinese/bin/tocn.pl +++ b/chinese/bin/tocn.pl @@ -8,7 +8,7 @@ s|^<A href=".*">(中文 \(GB\))</A>(?= )|$1|; s/软件套件/软件包/g; s/套件/软件包/g; while (s/^((?:[\x00-\x7F]|[\x80-\xFF].)+)「/$1“/) {} while (s/^((?:[\x00-\x7F]|[\x80-\xFF].)+)」/$1”/) {} -while (s/^((?:[\x00-\x7F]|[\x80-\xFF].)+(软|硬))体(?!动物)/$1软件/) {} +while (s/^((?:[\x00-\x7F]|[\x80-\xFF].)+(软|硬))体/$1软件/) {} while (s/^((?:[\x00-\x7F]|[\x80-\xFF].)+)程式/$1程序/) {} while (s/^((?:[\x00-\x7F]|[\x80-\xFF].)+(软|硬|光))碟/$1盘/) {} while (s/^((?:[\x00-\x7F]|[\x80-\xFF].)+)相容/$1兼容/) {} |