summaryrefslogtreecommitdiff
path: root/t/lib/db-recno.t
diff options
context:
space:
mode:
authorJarkko Hietaniemi <jhi@iki.fi>2001-06-16 19:46:38 +0000
committerJarkko Hietaniemi <jhi@iki.fi>2001-06-16 19:46:38 +0000
commit2986a63f7e513cf37f46db9f211b77071260031f (patch)
tree9a6e62602396938ea5a612420f53ebf267e8d941 /t/lib/db-recno.t
parent87b11a197a59fac210fc9265bde0ef1ffe36de89 (diff)
downloadperl-2986a63f7e513cf37f46db9f211b77071260031f.tar.gz
NetWare port from Guruprasad S <SGURUPRASAD@novell.com>.
p4raw-id: //depot/perl@10643
Diffstat (limited to 't/lib/db-recno.t')
-rwxr-xr-xt/lib/db-recno.t2
1 files changed, 1 insertions, 1 deletions
diff --git a/t/lib/db-recno.t b/t/lib/db-recno.t
index 4ca547f1e7..6dd913cfc2 100755
--- a/t/lib/db-recno.t
+++ b/t/lib/db-recno.t
@@ -153,7 +153,7 @@ my @h ;
ok(17, $X = tie @h, 'DB_File', $Dfile, O_RDWR|O_CREAT, 0640, $DB_RECNO ) ;
ok(18, ((stat($Dfile))[2] & 0777) == ($^O eq 'os2' ? 0666 : 0640)
- || $^O eq 'MSWin32' || $^O eq 'amigaos') ;
+ || $^O eq 'MSWin32' || $^O eq 'NetWare' || $^O eq 'amigaos') ;
#my $l = @h ;
my $l = $X->length ;