17 lines
451 B
Text
17 lines
451 B
Text
$NetBSD: patch-aa,v 1.3 2006/01/03 14:41:21 taca Exp $
|
|
|
|
--- sample/tkbiff.rb.orig 2004-10-11 13:51:13.000000000 +0900
|
|
+++ sample/tkbiff.rb
|
|
@@ -12,7 +12,11 @@ if ARGV.length == 0
|
|
if ENV['MAIL']
|
|
$spool = ENV['MAIL']
|
|
else
|
|
- $spool = '/var/spool/mail/' + ENV['USER']
|
|
+ dir = '/var/mail'
|
|
+ unless FileTest.directory?(dir)
|
|
+ dir = '/var/spool/mail'
|
|
+ end
|
|
+ $spool = dir + '/' + ENV['USER']
|
|
end
|
|
else
|
|
$spool = ARGV[0]
|