diff options
Diffstat (limited to 't/lib/db-hash.t')
-rwxr-xr-x | t/lib/db-hash.t | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/t/lib/db-hash.t b/t/lib/db-hash.t index 09c0ee2151..9ebd060e0a 100755 --- a/t/lib/db-hash.t +++ b/t/lib/db-hash.t @@ -72,7 +72,7 @@ ok(15, $X = tie(%h, 'DB_File',$Dfile, O_RDWR|O_CREAT, 0640, $DB_HASH ) ); ($dev,$ino,$mode,$nlink,$uid,$gid,$rdev,$size,$atime,$mtime,$ctime, $blksize,$blocks) = stat($Dfile); -ok(16, ($mode & 0777) == ($^O eq 'os2' ? 0666 : 0640) ); +ok(16, ($mode & 0777) == ($^O eq 'os2' ? 0666 : 0640) || $^O eq 'amigaos'); while (($key,$value) = each(%h)) { $i++; |