[Libreoffice-commits] core.git: wizards/source

[Jean-Pierre Ledure]

 wizards/source/access2base/Application.xba |   18 ------------------
 wizards/source/access2base/Root_.xba       |   13 -------------
 2 files changed, 31 deletions(-)

New commits:
commit c35fa61e25239a38079160f7c126ef6befa9584f
Author: Jean-Pierre Ledure <j...@ledure.be>
Date:   Sat Nov 5 12:18:55 2016 +0100

    Access2Base - Remove useless code in Root handling
    
    Change-Id: I6f3a6efd858ac4e52b694cc0046c8f56a558c229

diff --git a/wizards/source/access2base/Application.xba 
b/wizards/source/access2base/Application.xba
index 31e0340..ec3f729 100644
--- a/wizards/source/access2base/Application.xba
+++ b/wizards/source/access2base/Application.xba
@@ -160,23 +160,6 @@ Global Const CTLPARENTISGRID       = &quot;GRID&quot;
 Global Const CTLPARENTISGROUP  = &quot;OPTIONGROUP&quot;
 
 REM 
-----------------------------------------------------------------------------------------------------------------------
-Type Root
-       ErrorHandler            As Boolean
-       MinimalTraceLevel       As Integer
-       TraceLogs()                     As Variant
-       TraceLogCount           As Integer
-       TraceLogLast            As Integer
-       TraceLogMaxEntries      As Integer
-       CalledSub                       As String
-       Introspection           As Object                               &apos;  
com.sun.star.beans.Introspection        
-       VersionNumber           As String                               &apos;  
Actual Access2Base version number
-       FindRecord                      As Object
-       StatusBar                       As Object
-       Dialogs                         As Object                               
&apos;  Collection
-       TempVars                        As Object                               
&apos;  Collection
-       CurrentDoc()            As Variant                              &apos;  
Array of document containers - [0] = Base document, [1 ... N] = other documents
-End Type
-
 Type DocContainer
        Document                        As Object                               
&apos;  com.sun.star.comp.dba.ODatabaseDocument or SwXTextDocument or ScModelObj
        Active                          As Boolean
@@ -1483,7 +1466,6 @@ REM 
----------------------------------------------------------------------------
 Public Sub _RootInit(Optional ByVal pbForce As Boolean)
 &apos; Initialize _A2B_ global variable. Reinit forced if pbForce = True
 
-Dim vRoot As Root, vCurrentDoc() As Variant
        If IsMissing(pbForce) Then pbForce = False
        If IsEmpty(_A2B_) Or pbForce Then _A2B_ = New Root_
        
diff --git a/wizards/source/access2base/Root_.xba 
b/wizards/source/access2base/Root_.xba
index cee811b..5245b66 100644
--- a/wizards/source/access2base/Root_.xba
+++ b/wizards/source/access2base/Root_.xba
@@ -33,19 +33,6 @@ Private Dialogs                              As Object       
                        &apos;  Collection
 Private TempVars                       As Object                               
&apos;  Collection
 Private CurrentDoc()           As Variant                              &apos;  
Array of document containers - [0] = Base document, [1 ... N] = other documents
 
-Type DocContainer
-       Document                        As Object                               
&apos;  com.sun.star.comp.dba.ODatabaseDocument or SwXTextDocument or ScModelObj
-       Active                          As Boolean
-       DbConnect                       As Integer                              
&apos;  DBCONNECTxxx constants
-       URL                                     As String
-       DbContainers()          As Variant                              &apos;  
One entry by (data-aware) form
-End Type
-
-Type DbContainer
-       FormName                        As String                               
&apos;  name of data-aware form
-       Database                        As Object                               
&apos;  Database type
-End Type
-
 REM 
-----------------------------------------------------------------------------------------------------------------------
 REM --- CONSTRUCTORS / DESTRUCTORS                                             
                                                                                
                                        ---
 REM 
-----------------------------------------------------------------------------------------------------------------------
_______________________________________________
Libreoffice-commits mailing list
libreoffice-comm...@lists.freedesktop.org
https://lists.freedesktop.org/mailman/listinfo/libreoffice-commits