[Mew-dist 1470] Re: Mew 1.88 & im-55

[Motonori Nakamura]

昆虫採集の季節ですね…

- motonori

diff -ur ../im-55-/IM.in/Message.pm.in ./IM.in/Message.pm.in
--- ../im-55-/IM.in/Message.pm.in	Wed Aug  6 10:51:26 1997
+++ ./IM.in/Message.pm.in	Wed Aug  6 16:57:27 1997
@@ -770,7 +770,7 @@
 		require Sys::Hostname && import Sys::Hostname;
 
 		# host information
-		my $myhostname = hostname;
+		my $myhostname = hostname();
 		unless ($myhostname =~ /\./) {
 			my ($h) = gethostbyname($myhostname);
 			$myhostname = $h if ($h);
diff -ur ../im-55-/imget.in ./imget.in
--- ../im-55-/imget.in	Wed Aug  6 15:29:33 1997
+++ ./imget.in	Wed Aug  6 16:54:52 1997
@@ -102,7 +102,7 @@
 
 &set_scan_form($opt_form, $opt_width, $opt_jissafe);
 
-if ($opt_ossoc ne '') {
+if ($opt_assoc ne '') {
 	foreach $assoc (split(';', $opt_assoc)) {
 		my ($dst, $src) = split('=', $assoc);
 		my $m = &get_sub($src, $dst, $opt_mode);