diff --git a/ChangeLog b/ChangeLog
index 7a6919a8b..92ef8bf9e 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,10 @@
+2009-08-14  Wolfgang Sourdeau  <wsourdeau@inverse.ca>
+
+	* Tools/SOGoToolBackup.m (-extractUserPreferences:intoRecord:): we
+	must extract the values of the user defaults in order to put them
+	in the record dictionary. Putting the defaults themselves will
+	only produce serialized strings.
+
 2009-08-13  Wolfgang Sourdeau  <wsourdeau@inverse.ca>
 
 	* SoObjects/SOGo/LDAPSource.m: the objectClass are now all added
diff --git a/Tools/SOGoToolBackup.m b/Tools/SOGoToolBackup.m
index a015e0995..59618ee67 100644
--- a/Tools/SOGoToolBackup.m
+++ b/Tools/SOGoToolBackup.m
@@ -36,11 +36,13 @@
 #import <SOGo/LDAPSource.h>
 #import <SOGo/NSArray+Utilities.h>
 #import <SOGo/SOGoUser.h>
+#import <SOGo/SOGoUserDefaults.h>
 
 #import "NSDictionary+SOGoTool.h"
 #import "SOGoToolBackup.h"
 
 /* TODO:
+   - handle database connectivity errors
    - respond to "--help backup"
    - allow more than one user specifier on the command-line
 */
@@ -328,11 +330,13 @@
 {
   SOGoUser *sogoUser;
   NSArray *preferences;
+  NSDictionary *defaultsValues, *settingsValues;
 
   sogoUser = [SOGoUser userWithLogin: uid roles: nil];
-  preferences = [NSArray arrayWithObjects:
-                           [sogoUser userDefaults],
-                         [sogoUser userSettings], nil];
+  defaultsValues = [[sogoUser userDefaults] values];
+  settingsValues = [[sogoUser userSettings] values];
+  preferences = [NSArray arrayWithObjects: defaultsValues, settingsValues,
+                         nil];
   [userRecord setObject: preferences forKey: @"preferences"];
 
   return YES;