From a9e9697994a08600f5dbb46a1fe2a07233cb4890 Mon Sep 17 00:00:00 2001 From: matz Date: Thu, 4 Nov 1999 08:39:57 +0000 Subject: 19991104 git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/trunk@557 b2dd03c8-39d4-4d8f-98ff-823fe69b080e --- ext/dbm/dbm.c | 10 +++++++--- 1 file changed, 7 insertions(+), 3 deletions(-) (limited to 'ext/dbm/dbm.c') diff --git a/ext/dbm/dbm.c b/ext/dbm/dbm.c index 4d83cec1b1..1240f4b9ab 100644 --- a/ext/dbm/dbm.c +++ b/ext/dbm/dbm.c @@ -72,12 +72,16 @@ fdbm_s_open(argc, argv, klass) Check_SafeStr(file); dbm = 0; - if (mode >= 0) + if (mode >= 0) { dbm = dbm_open(RSTRING(file)->ptr, O_RDWR|O_CREAT, mode); - if (!dbm) + } + if (!dbm) { + mode = 0666; dbm = dbm_open(RSTRING(file)->ptr, O_RDWR, mode); - if (!dbm) + } + if (!dbm) { dbm = dbm_open(RSTRING(file)->ptr, O_RDONLY, mode); + } if (!dbm) { if (mode == -1) return Qnil; -- cgit v1.2.3