[Mew-dist 03408] Re: im-82.tar.gz

[Motonori Nakamura]

>>>>> On Wed, 14 Jan 1998 16:55:53 +0900, Motonori Nakamura <motonori at example.com> said:

miyaura> ちなみに私の環境も井上さんと同じ Solaris です。

|> とりあえず、Config に NoSync=yes を設定すれば、これまでと
|> 同じ仕様で動きます。

うーん。だれか、美しい対応方法を考えてくれないかなぁ…

とりあえず、どうしようもなければ、NoSync=yes にしてね、って叫んで
終るようにしました。

- motonori

diff -c ../../im-82-/IM.in/MsgStore.pm.in ./MsgStore.pm.in
*** ../../im-82-/IM.in/MsgStore.pm.in	Wed Jan 14 14:43:22 1998
--- ./MsgStore.pm.in	Thu Jan 15 08:39:27 1998
***************
*** 294,306 ****
      my $fno = shift;
  
      unless (defined($sys_fsync)) {
! 	my $inc = 'syscall.ph';
  	my $prefix;
! 	foreach $prefix (@INC) {
! 	    if (-f "$prefix/$inc") {
! 		require "$prefix/$inc";
! 		$sys_fsync = &SYS_fsync;
! 		last;
  	    }
  	}
  	unless ($sys_fsync) {
--- 294,313 ----
      my $fno = shift;
  
      unless (defined($sys_fsync)) {
! 	my $inc = 'syscall.ph';		# only for BSDs?
  	my $prefix;
! 	if (-f '/usr/include/sys.s') {	# for IRIX...
! 	    # create sys.ph from sys.s
! 	    require 'sys.ph';
! 	    $sys_fsync = &SYS_fsync if (defined(&SYS_fsync));
! 	}
! 	unless ($sys_fsync) {
! 	    foreach $prefix (@INC) {
! 		if (-f "$prefix/$inc") {
! 		    require "$prefix/$inc";
! 		    $sys_fsync = &SYS_fsync if (defined(&SYS_fsync));
! 		    last;
! 		}
  	    }
  	}
  	unless ($sys_fsync) {
***************
*** 316,322 ****
  	    }
  	}
  	unless ($sys_fsync) {
! 	    im_die("Can't locate syscall.ph in @INC (did you run h2ph?).\n");
  	}
      }
      return syscall($sys_fsync, $fno);
--- 323,329 ----
  	    }
  	}
  	unless ($sys_fsync) {
! 	    im_die("Can't find a way to fsync(). Set NoSync=yes in your Config file and be careful on file system overflow if your mail folders are on NFS.\n");
  	}
      }
      return syscall($sys_fsync, $fno);



- motonori