Access2Base - Remove useless trailing blank lines

Keep exactly 1 line feed at the end of each Basic module

wizards/source/access2base/Application.xba

@@ -1638,4 +1638,5 @@ Public Sub _RootInit(Optional ByVal pbForce As Boolean)
 	If IsEmpty(_A2B_) Or pbForce Then _A2B_ = New Root_
 	
 End Sub		'	_RootInit	V1.1.0
+
 </script:module>

wizards/source/access2base/Collect.xba

@@ -423,4 +423,5 @@ Error_Function:
 	_PropertyGet = Nothing
 	GoTo Exit_Function
 End Function		'	_PropertyGet
+
 </script:module>

wizards/source/access2base/CommandBar.xba

@@ -380,4 +380,5 @@ Error_Function:
 	_PropertySet = False
 	GoTo Exit_Function
 End Function			'	_PropertySet
+
 </script:module>

wizards/source/access2base/CommandBarControl.xba

@@ -330,4 +330,5 @@ Error_Function:
 	_PropertySet = False
 	GoTo Exit_Function
 End Function			'	_PropertySet
+
 </script:module>

wizards/source/access2base/Compatible.xba

@@ -45,4 +45,5 @@ Exit_Sub:
 	Utils._ResetCalledSub("DebugPrint")
 	Exit Sub
 End Sub			'	DebugPrint		V0.9.5
+
 </script:module>

wizards/source/access2base/Control.xba

@@ -2488,4 +2488,5 @@ Error_Function:
 	_PropertySet = False
 	GoTo Exit_Function
 End Function			'	_PropertySet	V1.1.0
+
 </script:module>

wizards/source/access2base/DataDef.xba

@@ -577,4 +577,5 @@ Error_Function:
 	_PropertySet = False
 	GoTo Exit_Function
 End Function			'	_PropertySet
+
 </script:module>

wizards/source/access2base/Database.xba

@@ -1860,4 +1860,5 @@ Const cstSingleQuote = "'"
 	_ReplaceSquareBrackets = Trim(Join(vSubStrings, cstSingleQuote))
 	
 End Function	'	ReplaceSquareBrackets		V1.1.0
+
 </script:module>

wizards/source/access2base/Dialog.xba

@@ -800,4 +800,5 @@ Error_Function:
 	_PropertySet = False
 	GoTo Exit_Function
 End Function		'	_PropertySet
+
 </script:module>

wizards/source/access2base/DoCmd.xba

@@ -2650,4 +2650,5 @@ Dim oShell As Object
 	oShell.execute(sCommand, "" , com.sun.star.system.SystemShellExecuteFlags.DEFAULTS)
 
 End Sub				'	_ShellExecute			V0.8.5
+
 </script:module>

wizards/source/access2base/Event.xba

@@ -493,4 +493,5 @@ Error_Function:
 	_PropertyGet = EMPTY
 	GoTo Exit_Function
 End Function		'	_PropertyGet	V1.1.0
+
 </script:module>

wizards/source/access2base/Field.xba

@@ -914,4 +914,5 @@ Error_Function:
 	TraceError(TRACEABORT, Err, _CalledSub, Erl)
 	GoTo Exit_Function
 End Function		'	WriteAll
+
 </script:module>

wizards/source/access2base/Form.xba

@@ -1112,4 +1112,5 @@ Error_Function:
 	_PropertySet = False
 	GoTo Exit_Function
 End Function		'	_PropertySet
+
 </script:module>

wizards/source/access2base/L10N.xba

@@ -536,5 +536,4 @@ Dim oLocale as Object
 	_GetLocale = oLocale.getByName("ooLocale")
 End Function	'	GetLocale			V0.8.9
 
-
 </script:module>

wizards/source/access2base/Methods.xba

@@ -294,4 +294,5 @@ Error_Function:
 	TraceError(TRACEABORT, Err,"_OptionGroup", Erl)
 	GoTo Exit_Function
 End Function		'	_OptionGroup	V1.1.0
+
 </script:module>

wizards/source/access2base/Module.xba

@@ -226,8 +226,6 @@ Public Function Properties(ByVal Optional pvIndex As Variant) As Variant
 '	Return
 '		a Collection object if pvIndex absent
 '		a Property object otherwise
-REM -----------------------------------------------------------------------------------------------------------------------
-
 
 Const cstThisSub = "Module.Properties"
 	Utils._SetCalledSub(cstThisSub)
@@ -368,8 +366,6 @@ End Function	'	Find
 REM -----------------------------------------------------------------------------------------------------------------------
 Public Function getProperty(Optional ByVal pvProperty As Variant) As Variant
 '	Return property value of psProperty property name
-REM -----------------------------------------------------------------------------------------------------------------------
-
 
 Const cstThisSub = "Module.Properties"
 
@@ -718,5 +714,4 @@ Error_Function:
 	GoTo Exit_Function
 End Function		'	_PropertyGet
 
-
-</script:module>
+</script:module>

wizards/source/access2base/OptionGroup.xba

@@ -303,4 +303,5 @@ Error_Function:
 	_PropertySet = False
 	GoTo Exit_Function
 End Function		'	_PropertySet
+
 </script:module>

wizards/source/access2base/PropertiesGet.xba

@@ -1212,4 +1212,5 @@ Exit_Function:
 	Set _PropertiesList = vPropertiesList
 	Exit Function
 End Function		'	PropertiesList		V0.9.0
+
 </script:module>

wizards/source/access2base/PropertiesSet.xba

@@ -590,4 +590,5 @@ Error_Function:
 	TraceError(TRACEABORT, Err, "_setProperty", Erl)
 	GoTo Exit_Function
 End Function		'	_setProperty	V0.9.1
+
 </script:module>

wizards/source/access2base/Property.xba

@@ -144,5 +144,4 @@ Error_Function:
 	GoTo Exit_Function
 End Function		'	_PropertyGet
 
-
 </script:module>

wizards/source/access2base/Recordset.xba

@@ -1261,4 +1261,5 @@ Error_Function:
 	_PropertySet = False
 	GoTo Exit_Function
 End Function		'	_PropertySet
+
 </script:module>

wizards/source/access2base/Root_.xba

@@ -284,4 +284,5 @@ Trace_Error:
 	TraceError(TRACEABORT, ERRDBNOTCONNECTED, Utils._CalledSub(), 0, 1)
 	Goto Exit_Function
 End Function		'	_CurrentDb
+
 </script:module>

wizards/source/access2base/SubForm.xba

@@ -745,4 +745,5 @@ Error_Function:
 	_PropertySet = False
 	GoTo Exit_Function
 End Function		'	_PropertySet
+
 </script:module>

wizards/source/access2base/TempVar.xba

@@ -188,4 +188,5 @@ Error_Function:
 	_PropertySet = False
 	GoTo Exit_Function
 End Function		'	_PropertySet
+
 </script:module>

wizards/source/access2base/UtilProperty.xba

@@ -326,4 +326,5 @@ Const cstEqualArray = " = (", cstEqual = " = "
 	_StrToPropValues = vResult
 
 End Function
+
 </script:module>

wizards/source/access2base/Utils.xba

@@ -1295,5 +1295,4 @@ Private Function _UTF8Encode(ByVal psChar As String) As String
 
 End Function	'	_UTF8Encode V1.4.0
 
-
 </script:module>