// Licence: wxWindows Licence
/////////////////////////////////////////////////////////////////////////////
-#ifdef __GNUG__
+#if defined(__GNUG__) && !defined(NO_GCC_PRAGMA)
#pragma implementation
#endif
#include "wx/defs.h"
#if wxUSE_HTML && wxUSE_STREAMS
-#ifdef __BORDLANDC__
+#ifdef __BORLANDC__
#pragma hdrstop
#endif
FORCE_LINK_ME(m_pre)
+// replaces '\t', ' ' and '\n' with HTML markup:
+static wxString LINKAGEMODE HtmlizeWhitespaces(const wxString& str)
+{
+ wxString out;
+ size_t i = 0, j = 0, len = str.Len();
+ for (i = 0; i < len; i++)
+ {
+ switch (str[i])
+ {
+ case wxT('<'):
+ while (i < len && str[i] != wxT('>'))
+ out << str[i++];
+ out << wxT('>');
+ break;
+ case wxT(' '):
+ out << wxT(" ");
+ break;
+ case wxT('\n'):
+ out << wxT("<br>");
+ break;
+ case wxT('\t'):
+ for (j = 8 - i%8; j > 0; j--) out << wxT(" ");
+ break;
+ default:
+ out << str[i];
+ break;
+ }
+ }
+ return out;
+}
+
+
//-----------------------------------------------------------------------------
// The list handler:
//-----------------------------------------------------------------------------
TAG_HANDLER_BEGIN(PRE, "PRE")
+ TAG_HANDLER_CONSTR(PRE) { }
TAG_HANDLER_PROC(tag)
{
m_WParser->CloseContainer();
c = m_WParser->OpenContainer();
c->SetAlignHor(wxHTML_ALIGN_LEFT);
+ c->SetIndent(m_WParser->GetCharHeight(), wxHTML_INDENT_TOP);
- wxString srcMid =
+ wxString srcMid =
m_WParser->GetSource()->Mid(tag.GetBeginPos(),
tag.GetEndPos1() - tag.GetBeginPos());
- srcMid.Replace(wxT("\t"), wxT(" "));
- srcMid.Replace(wxT(" "), wxT(" "));
- srcMid.Replace(wxT("\n"), wxT("<br>"));
-
// It is safe to temporarily change the source being parsed,
// provided we restore the state back after parsing
- m_Parser->SetSourceAndSaveState(srcMid);
+ m_Parser->SetSourceAndSaveState(HtmlizeWhitespaces(srcMid));
m_Parser->DoParsing();
m_Parser->RestoreState();