[Mew-dist 1270] PetnameFile

[尾澤 稔]

尾澤＠沖電気と申します。

IMのPetnameFileの機能で、

ozawa at example.com	"尾澤 稔"

とした時に、ozawa at example.com のPetnameが 尾澤 になってしまいま
す。

Petnameがちゃんと 尾澤 稔 となるようにするためのパッチです。

-------------- next part --------------
--- Scan.pm.in.orig	Wed Jul 16 14:11:18 1997
+++ Scan.pm.in	Mon Jul 21 09:39:33 1997
@@ -574,7 +574,8 @@
 	next if (/^$/);
 	next if (/^#/);
 	chomp;
-	my ($name, $petname) = split;
+#	my ($name, $petname) = split;
+	my ($name, $petname) = /^(\S+)\s*(.*)$/;
 	$petname =~ s/^"//;
 	$petname =~ s/"$//;
 	$petnames{lc($name)} = $petname;
-------------- next part --------------
						尾澤 稔
						ozawa at example.com