blob: 50aa5079a11fa7f32ae1a5baad96f5ef1b3286e4 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
|
$NetBSD: patch-ak,v 1.1 2001/09/24 03:56:02 taca Exp $
--- pl/util.pl.orig Mon Aug 20 22:32:20 2001
+++ pl/util.pl
@@ -145,7 +145,8 @@
return '';
}
} else {
- $fh = efopen($arg) || return 0; # in case file is removed after find_file
+ $fh = fopen($arg) || return 0; # in case file is removed after find_file
+ # 2.0.7 had problem
}
my $size = -s $fh;
return $size;
|