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

[Jean-Pierre Ledure]

 wizards/source/access2base/Database.xba |    3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

New commits:
commit f2e525eb2707a98a0d0a1bdeaf054c3981ce5f6b
Author: Jean-Pierre Ledure <jp at ledure.be>
Date:   Sat Dec 5 12:33:52 2015 +0100

    Access2Base - OutputTo HTML
    
    Add <span> in the list of acceptable html tags
    
    Change-Id: I23c57ad1ef889fd511111f6d969feaafb9d0f5b8

diff --git a/wizards/source/access2base/Database.xba b/wizards/source/access2base/Database.xba
index 15d9d40..e28159e 100644
--- a/wizards/source/access2base/Database.xba
+++ b/wizards/source/access2base/Database.xba
@@ -1187,6 +1187,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>" _
 					, "<b>", "</b>", "<u>", "</u>", "<i>", "</i>" _
 					)
 
@@ -1212,7 +1213,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="""
+				Case "<a href=""", "<a id=""", "<img src=""", "<span style="""
 					'	Up to next quote, url-encode
 					lNextQuote = 0
 					lUrl = lPattern + Len(sPattern)