[JVCL-Checkins] SF.net SVN: jvcl:[12415] trunk/jvcl/run/JvMemoryDataset.pas

[<ob...@us...>]

Revision: 12415
          http://jvcl.svn.sourceforge.net/jvcl/?rev=12415&view=rev
Author:   obones
Date:     2009-08-04 07:34:04 +0000 (Tue, 04 Aug 2009)

Log Message:
-----------
Mantis 4826: First must be outside the begin/end block.

Modified Paths:
--------------
    trunk/jvcl/run/JvMemoryDataset.pas

Modified: trunk/jvcl/run/JvMemoryDataset.pas
===================================================================
--- trunk/jvcl/run/JvMemoryDataset.pas	2009-07-30 10:00:33 UTC (rev 12414)
+++ trunk/jvcl/run/JvMemoryDataset.pas	2009-08-04 07:34:04 UTC (rev 12415)
@@ -1,4 +1,4 @@
-{-----------------------------------------------------------------------------
+{-----------------------------------------------------------------------------
 The contents of this file are subject to the Mozilla Public License
 Version 1.1 (the "License"); you may not use this file except in compliance
 with the License. You may obtain a copy of the License at
@@ -1133,10 +1133,8 @@
   begin
     CheckBrowseMode;
     if Filtered <> Value then
-    begin
       inherited SetFiltered(Value);
-      First;
-    end;
+    First;
   end
   else
     inherited SetFiltered(Value);


This was sent by the SourceForge.net collaborative development platform, the world's largest Open Source development site.