From 16ca8db2105ef636dfd3f8550dac4c9d31d9f163 Mon Sep 17 00:00:00 2001
From: Sebastian Reitenbach <sebastia@l00-bugdead-prods.de>
Date: Tue, 12 Mar 2013 15:21:27 +0000
Subject: [PATCH]         * Apps/EOModelEditor/DataBrowser.[h|m]           *
 make the fetch limit and qualifier fields work

git-svn-id: svn+ssh://svn.gna.org/svn/gnustep/libs/gdl2/trunk@36343 72102866-910b-0410-8b05-ffd578937521
---
 Apps/EOModelEditor/DataBrowser.h | 4 ++--
 Apps/EOModelEditor/DataBrowser.m | 5 ++++-
 ChangeLog                        | 4 ++++
 3 files changed, 10 insertions(+), 3 deletions(-)

diff --git a/Apps/EOModelEditor/DataBrowser.h b/Apps/EOModelEditor/DataBrowser.h
index 2406424..8ace3f2 100644
--- a/Apps/EOModelEditor/DataBrowser.h
+++ b/Apps/EOModelEditor/DataBrowser.h
@@ -37,8 +37,8 @@
 {
   IBOutlet NSWindow         * _window;
   IBOutlet NSTextField      * _entityNameField;
-  IBOutlet NSTextField      * _fetchLimitText;
-  IBOutlet NSTextField      * _qualifierText;
+  IBOutlet NSTextField      * fetchLimitText;
+  IBOutlet NSTextField      * qualifierText;
   IBOutlet NSTableView      * _tableView;
   EOEntity                  * _currentEntity;
   TableViewController       *_tableViewController;
diff --git a/Apps/EOModelEditor/DataBrowser.m b/Apps/EOModelEditor/DataBrowser.m
index e1f66f9..f01bdde 100644
--- a/Apps/EOModelEditor/DataBrowser.m
+++ b/Apps/EOModelEditor/DataBrowser.m
@@ -156,12 +156,15 @@ static DataBrowser *sharedDataBrowser = nil;
       [_editingContext invalidateAllObjects];
     }
     
-    
+    if ([[qualifierText stringValue] length] > 0)
+      qual = [EOQualifier qualifierWithQualifierFormat:[qualifierText stringValue]];
     
     fetchSpec = [EOFetchSpecification fetchSpecificationWithEntityName:[_currentEntity name]
                                                              qualifier:qual
                                                          sortOrderings:nil];
     
+    [fetchSpec setFetchLimit:[fetchLimitText intValue]];
+
     [fetchSpec setRawRowKeyPaths:keyPaths];
     
     results = [_editingContext objectsWithFetchSpecification:fetchSpec];
diff --git a/ChangeLog b/ChangeLog
index 26f5e42..f61f718 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,7 @@
+2013-03-13: Sebastian Reitenbach <sebastia@l00-bugdead-prods.de>
+	* Apps/EOModelEditor/DataBrowser.[h|m]
+	  * make the fetch limit and qualifier fields work
+
 2013-03-10: Sebastian Reitenbach <sebastia@l00-bugdead-prods.de>
 	* Apps/EOModelEditor/Inspectors/EntityInspector.m
 	  add warning about method not implemented