html export: 4.0 needs type attribute for style tag

Change-Id: Iaa076f639a4da564945385ee616d346c4f0d0889

dbaccess/source/ui/misc/TokenWriter.cxx

@@ -737,7 +737,8 @@ void OHTMLImportExport::WriteBody()
 {
     SAL_INFO("dbaccess.ui", "OHTMLImportExport::WriteBody" );
 
-    IncIndent(1); TAG_ON_LF( OOO_STRING_SVTOOLS_HTML_style );
+    IncIndent(1);
+    (*m_pStream) << "<" << OOO_STRING_SVTOOLS_HTML_style << " " << OOO_STRING_SVTOOLS_HTML_O_type << "=\"text/css\">";
 
     (*m_pStream) << sMyBegComment; OUT_LF();
     (*m_pStream) << OOO_STRING_SVTOOLS_HTML_body " { " << sFontFamily << '"' << OUStringToOString(m_aFont.Name, osl_getThreadTextEncoding()).getStr() << '\"';

sc/source/filter/html/htmlexp.cxx

@@ -363,7 +363,9 @@ void ScHTMLExport::WriteHeader()
 
     // CSS1 StyleSheet
     PageDefaults( bAll ? 0 : aRange.aStart.Tab() );
-    IncIndent(1); TAG_ON_LF( OOO_STRING_SVTOOLS_HTML_style );
+    IncIndent(1);
+    rStrm << "<" << OOO_STRING_SVTOOLS_HTML_style << " " << OOO_STRING_SVTOOLS_HTML_O_type << "=\"text/css\">";
+
     rStrm << sMyBegComment; OUT_LF();
     rStrm << OOO_STRING_SVTOOLS_HTML_body << "," << OOO_STRING_SVTOOLS_HTML_division << "," << OOO_STRING_SVTOOLS_HTML_table << ","
         << OOO_STRING_SVTOOLS_HTML_thead << "," << OOO_STRING_SVTOOLS_HTML_tbody << "," << OOO_STRING_SVTOOLS_HTML_tfoot << ","