[Libreoffice-commits] core.git: Branch 'libreoffice-4-4' - wizards/source

[Jean-Pierre Ledure]

 wizards/source/access2base/Recordset.xba |   21 +++++++++------------
 1 file changed, 9 insertions(+), 12 deletions(-)

New commits:
commit 8a315c82aa6609800b4651811cf72c06cc1b9b29
Author: Jean-Pierre Ledure <j...@ledure.be>
Date:   Sat Jun 13 14:33:36 2015 +0200

    Access2Base - Correct behaviour of MoveNext, MovePrevious (patch 03)
    
    Bug in MoveNext and MovePrevious methods of Recordset class module
    Reported in https://forum.openoffice.org/en/forum/viewtopic.php?f=47&t=76640
    
    Change-Id: I6c2a3f6e23bbc414f594c791a86066d46a7b09f4
    Reviewed-on: https://gerrit.libreoffice.org/16257
    Reviewed-by: Caolán McNamara <caol...@redhat.com>
    Tested-by: Caolán McNamara <caol...@redhat.com>

diff --git a/wizards/source/access2base/Recordset.xba 
b/wizards/source/access2base/Recordset.xba
index 4a9c833..4df3af2 100644
--- a/wizards/source/access2base/Recordset.xba
+++ b/wizards/source/access2base/Recordset.xba
@@ -920,18 +920,15 @@ Dim l As Long, lRow As Long
                                End If
                End Select
 
-               Select Case True
-                       Case .isBeforeFirst()
-                               _BOF = True
-                               _Move = False
-                       Case .isAfterlast()
-                               _EOF = True
-                               _Move = False
-                       Case Else
-                               If .rowDeleted() Then Goto Error_RowDeleted
-                               If .rowUpdated() Then .refreshRow()
-                               _Move = True
-               End Select
+               _BOF = .isBeforeFirst()                 &apos;  
https://forum.openoffice.org/en/forum/viewtopic.php?f=47&amp;t=76640
+               _EOF = .isAfterlast()
+               If _BOF Or _EOF Then
+                       _Move = False
+               Else
+                       If .rowDeleted() Then Goto Error_RowDeleted
+                       If .rowUpdated() Then .refreshRow()
+                       _Move = True
+               End If
        End With
 
 Exit_Function:

_______________________________________________
Libreoffice-commits mailing list
libreoffice-comm...@lists.freedesktop.org
http://lists.freedesktop.org/mailman/listinfo/libreoffice-commits