From 127c08ae4ffc9cf7c35bb3f04e86dc56bc947387 Mon Sep 17 00:00:00 2001
From: Richard Frith-MacDonald <rfm@gnu.org>
Date: Tue, 5 Oct 1999 07:02:37 +0000
Subject: [PATCH] Don't crash when database is unloadable.

git-svn-id: svn+ssh://svn.gna.org/svn/gnustep/libs/base/trunk@4972 72102866-910b-0410-8b05-ffd578937521
---
 Source/NSUserDefaults.m | 6 ++++++
 1 file changed, 6 insertions(+)

diff --git a/Source/NSUserDefaults.m b/Source/NSUserDefaults.m
index 2189b84a6..c5ebbc61d 100644
--- a/Source/NSUserDefaults.m
+++ b/Source/NSUserDefaults.m
@@ -733,6 +733,12 @@ static BOOL setSharedDefaults = NO;	/* Flag to prevent infinite recursion */
     {
       newDict = [[NSMutableDictionaryClass allocWithZone: [self zone]]
         initWithContentsOfFile: _defaultsDatabase];
+      if (newDict == nil)
+	{
+	  [_defaultsDatabaseLock unlock];	// release file lock
+	  NSLog(@"Unable to load defaults from '%@'", _defaultsDatabase);
+	  return NO;
+	}
     }
   else
     {