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

Jean-Pierre Ledure jp at ledure.be
Mon May 22 13:11:17 UTC 2017


 wizards/source/access2base/Database.xba |    4 ++--
 wizards/source/access2base/Field.xba    |    2 +-
 2 files changed, 3 insertions(+), 3 deletions(-)

New commits:
commit 7959165dfd731da900b97aa37db068a2cfc3800f
Author: Jean-Pierre Ledure <jp at ledure.be>
Date:   Mon May 22 15:08:56 2017 +0200

    Access2Base - Class attribute in <span> tag
    
    Replaces the style attribute
    
    Change-Id: Id9366fc403fd0d3ab8c32a13d60b6c1c7ae74d43

diff --git a/wizards/source/access2base/Database.xba b/wizards/source/access2base/Database.xba
index f7463e03a94c..3b9535df5330 100644
--- a/wizards/source/access2base/Database.xba
+++ b/wizards/source/access2base/Database.xba
@@ -1431,7 +1431,7 @@ Dim i As Integer, l As Long
 					"&quot;", "&amp;", "&apos;", "&lt;", "&gt;", "&nbsp;" _
 					, "<pre>", "</pre>", "<br>" _
 					, "<a href=""", "<a id=""", "</a>", "<img src=""" _
-					, "<span style=""", "</span>" _
+					, "<span class=""", "</span>" _
 					, "<b>", "</b>", "<u>", "</u>", "<i>", "</i>" _
 					)
 
@@ -1457,7 +1457,7 @@ Dim i As Integer, l As Long
 		'	Process hyperlink patterns and keep others
 		If Len(sPattern) > 0 Then
 			Select Case LCase(sPattern)
-				Case "<a href=""", "<a id=""", "<img src=""", "<span style="""
+				Case "<a href=""", "<a id=""", "<img src=""", "<span class="""
 					'	Up to next quote, url-encode
 					lNextQuote = 0
 					lUrl = lPattern + Len(sPattern)
diff --git a/wizards/source/access2base/Field.xba b/wizards/source/access2base/Field.xba
index bae69310e92d..651ae6ec64b6 100644
--- a/wizards/source/access2base/Field.xba
+++ b/wizards/source/access2base/Field.xba
@@ -383,7 +383,7 @@ Private Function _PropertiesList() As Variant
 								, "Description", "Name", "ObjectType", "Size", "SourceField", "SourceTable" _
 								, "TypeName" _
 								)
-		Case OBJRECORDSET			
+		Case OBJRECORDSET
 			_PropertiesList = Array("DataType", "DataUpdatable",  "dbType", "DefaultValue" _
 								, "Description" , "FieldSize", "Name", "ObjectType" _
 								, "Size", "SourceTable", "TypeName", "Value" _


More information about the Libreoffice-commits mailing list