diff --git a/ChangeLog b/ChangeLog
index c38c54d5c..fee0038a5 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,5 +1,8 @@
 2007-06-19  Wolfgang Sourdeau  <wsourdeau@inverse.ca>
 
+	* SoObjects/SOGo/AgenorUserDefaults.m ([AgenorUserDefaults
+	-jsonRepresentation]): new method with an explicit name.
+
 	* UI/PreferencesUI/product.plist: new bundle that provides a web
 	ui for handling user defaults.
 
diff --git a/SoObjects/SOGo/AgenorUserDefaults.h b/SoObjects/SOGo/AgenorUserDefaults.h
index 7bdbca786..e2f1085ae 100644
--- a/SoObjects/SOGo/AgenorUserDefaults.h
+++ b/SoObjects/SOGo/AgenorUserDefaults.h
@@ -78,6 +78,8 @@
 - (void) setFloat: (float) value forKey: (NSString *) key;
 - (void) setInteger: (int) value forKey: (NSString *) key;
 
+- (NSString *) jsonRepresentation;
+
 /* saving changes */
 
 - (BOOL) synchronize;
diff --git a/SoObjects/SOGo/AgenorUserDefaults.m b/SoObjects/SOGo/AgenorUserDefaults.m
index 07bb5d0d6..c1104ceb0 100644
--- a/SoObjects/SOGo/AgenorUserDefaults.m
+++ b/SoObjects/SOGo/AgenorUserDefaults.m
@@ -32,6 +32,8 @@
 #import <GDLAccess/EOAdaptorContext.h>
 #import <GDLAccess/EOAttribute.h>
 
+#import "NSObject+Utilities.h"
+
 #import "AgenorUserDefaults.h"
 
 @implementation AgenorUserDefaults
@@ -325,6 +327,13 @@ static NSString *uidColumnName = @"uid";
   return (values || [self primaryFetchProfile]);
 }
 
+- (NSString *) jsonRepresentation
+{
+  [self fetchProfile];
+
+  return [values jsonRepresentation];
+}
+
 /* value access */
 
 - (void) setObject: (id) value