Wiki: DebugInfo: FixToHtmlMiniBuf


Detailed view of a page, which is probably more useful for debugging than anything else.

Querying backend directly for 'FixToHtmlMiniBuf'

get_pagedata('FixToHtmlMiniBuf')
 _cached_html  
transformedtext Object
(
    [_type] => pagetype_wikitext Object
        (
        )

    [_basepage] => FixToHtmlMiniBuf
    [_content] => Array
        (
            [0] => <div class="wikitext"><p class="tightenable top">&amp;lt;verbatim&amp;gt;
&quot; Vim syntax support file
&quot; Maintainer: Bram Moolenaar &amp;lt;Bram@vim.org&amp;gt;
&quot; Last Change: 2004 May 3
&quot;              (modified by Tofer Chagnon &amp;lt;toferc@mail.com&amp;gt;)
&quot;              (modified by David Ne\v{c}as (Yeti) &amp;lt;yeti@physics.muni.cz&amp;gt;)</p>
<p class="tightenable">&quot; Transform a file into HTML, using the current syntax highlighting.</p>
<p class="tightenable bottom">&quot; Number lines when explicitely requested or when `number' is set
if exists(&quot;html_number_lines&quot;)</p>
<blockquote class="tightenable top bottom"><p class="tightenable top bottom">let s:numblines = html_number_lines</p>
</blockquote>
<p class="tightenable top bottom">else</p>
<blockquote class="tightenable top bottom"><p class="tightenable top bottom">let s:numblines = &amp;amp;number</p>
</blockquote>
<p class="tightenable top">endif</p>
<p class="tightenable bottom">&quot; When not in gui we can only guess the colors.
if has(&quot;gui_running&quot;)</p>
<blockquote class="tightenable top bottom"><p class="tightenable top bottom">let s:whatterm = &quot;gui&quot;</p>
</blockquote>
<p class="tightenable top bottom">else</p>
<blockquote class="tightenable top bottom"><p class="tightenable top bottom">let s:whatterm = &quot;cterm&quot;
if &amp;amp;t_Co == 8</p>
<blockquote class="tightenable top bottom"><p class="tightenable top bottom">let s:cterm_color0  = &quot;#808080&quot;
let s:cterm_color1  = &quot;#ff6060&quot;
let s:cterm_color2  = &quot;#00ff00&quot;
let s:cterm_color3  = &quot;#ffff00&quot;
let s:cterm_color4  = &quot;#8080ff&quot;
let s:cterm_color5  = &quot;#ff40ff&quot;
let s:cterm_color6  = &quot;#00ffff&quot;
let s:cterm_color7  = &quot;#ffffff&quot;</p>
</blockquote>
<p class="tightenable top bottom">else</p>
<blockquote class="tightenable top bottom"><p class="tightenable top bottom">let s:cterm_color0  = &quot;#000000&quot;
let s:cterm_color1  = &quot;#c00000&quot;
let s:cterm_color2  = &quot;#008000&quot;
let s:cterm_color3  = &quot;#804000&quot;
let s:cterm_color4  = &quot;#0000c0&quot;
let s:cterm_color5  = &quot;#c000c0&quot;
let s:cterm_color6  = &quot;#008080&quot;
let s:cterm_color7  = &quot;#c0c0c0&quot;
let s:cterm_color8  = &quot;#808080&quot;
let s:cterm_color9  = &quot;#ff6060&quot;
let s:cterm_color10 = &quot;#00ff00&quot;
let s:cterm_color11 = &quot;#ffff00&quot;
let s:cterm_color12 = &quot;#8080ff&quot;
let s:cterm_color13 = &quot;#ff40ff&quot;
let s:cterm_color14 = &quot;#00ffff&quot;
let s:cterm_color15 = &quot;#ffffff&quot;</p>
</blockquote>
<p class="tightenable top bottom">endif</p>
</blockquote>
<p class="tightenable top">endif</p>
<p class="tightenable bottom">&quot; Return good color specification: in GUI no transformation is done, in
&quot; terminal return RGB values of known colors and empty string on unknown
if s:whatterm == &quot;gui&quot;</p>
<blockquote class="tightenable top bottom"><p class="tightenable top bottom">function! s:
            [1] => cached_wikilink Object
                (
                    [_page] => HtmlColor
                )

            [2] => (color)</p>
<blockquote class="tightenable top bottom"><p class="tightenable top bottom">return a:color</p>
</blockquote>
<p class="tightenable top bottom">endfun</p>
</blockquote>
<p class="tightenable top bottom">else</p>
<blockquote class="tightenable top bottom"><p class="tightenable top bottom">function! s:
            [3] => cached_wikilink Object
                (
                    [_page] => HtmlColor
                )

            [4] => (color)</p>
<blockquote class="tightenable top bottom"><p class="tightenable top bottom">if exists(&quot;s:cterm_color&quot; . a:color)</p>
<blockquote class="tightenable top bottom"><p class="tightenable top bottom">execute &quot;return s:cterm_color&quot; . a:color</p>
</blockquote>
<p class="tightenable top bottom">else</p>
<blockquote class="tightenable top bottom"><p class="tightenable top bottom">return</p>
</blockquote>
<p class="tightenable top bottom">endif</p>
</blockquote>
<p class="tightenable top bottom">endfun</p>
</blockquote>
<p class="tightenable top">endif</p>
<p class="tightenable bottom">if !exists(&quot;html_use_css&quot;)</p>
<blockquote class="tightenable top bottom"><p class="tightenable top bottom">&quot; Return opening HTML tag for given highlight id
function! s:
            [5] => cached_wikilink Object
                (
                    [_page] => HtmlOpening
                )

            [6] => (id)</p>
<blockquote class="tightenable top bottom"><p class="tightenable top bottom">let a =
if synIDattr(a:id, &quot;inverse&quot;)</p>
<blockquote class="tightenable top bottom"><p class="tightenable top bottom">&quot; For inverse, we always must set both colors (and exchange them)
let x = s:
            [7] => cached_wikilink Object
                (
                    [_page] => HtmlColor
                )

            [8] => (synIDattr(a:id, &quot;fg#&quot;, s:whatterm))
let a = a . '&amp;lt;span style=&quot;background-color: ' . ( x !=  ? x : s:fgc ) . '&quot;&amp;gt;'
let x = s:
            [9] => cached_wikilink Object
                (
                    [_page] => HtmlColor
                )

            [10] => (synIDattr(a:id, &quot;bg#&quot;, s:whatterm))
let a = a . '&amp;lt;font color=&quot;' . ( x !=  ? x : s:bgc ) . '&quot;&amp;gt;'</p>
</blockquote>
<p class="tightenable top bottom">else</p>
<blockquote class="tightenable top bottom"><p class="tightenable top bottom">let x = s:
            [11] => cached_wikilink Object
                (
                    [_page] => HtmlColor
                )

            [12] => (synIDattr(a:id, &quot;bg#&quot;, s:whatterm))
if x !=  | let a = a . '&amp;lt;span style=&quot;background-color: ' . x . '&quot;&amp;gt;' | endif
let x = s:
            [13] => cached_wikilink Object
                (
                    [_page] => HtmlColor
                )

            [14] => (synIDattr(a:id, &quot;fg#&quot;, s:whatterm))
if x !=  | let a = a . '&amp;lt;font color=&quot;' . x . '&quot;&amp;gt;' | endif</p>
</blockquote>
<p class="tightenable top bottom">endif
if synIDattr(a:id, &quot;bold&quot;) | let a = a . &quot;&amp;lt;b&amp;gt;&quot; | endif
if synIDattr(a:id, &quot;italic&quot;) | let a = a . &quot;&amp;lt;i&amp;gt;&quot; | endif
if synIDattr(a:id, &quot;underline&quot;) | let a = a . &quot;&amp;lt;u&amp;gt;&quot; | endif
return a</p>
</blockquote>
<p class="tightenable top">endfun</p>
<p class="tightenable bottom">&quot; Return closing HTML tag for given highlight id
function s:
            [15] => cached_wikilink Object
                (
                    [_page] => HtmlClosing
                )

            [16] => (id)</p>
<blockquote class="tightenable top bottom"><p class="tightenable top bottom">let a =
if synIDattr(a:id, &quot;underline&quot;) | let a = a . &quot;&amp;lt;/u&amp;gt;&quot; | endif
if synIDattr(a:id, &quot;italic&quot;) | let a = a . &quot;&amp;lt;/i&amp;gt;&quot; | endif
if synIDattr(a:id, &quot;bold&quot;) | let a = a . &quot;&amp;lt;/b&amp;gt;&quot; | endif
if synIDattr(a:id, &quot;inverse&quot;)</p>
<blockquote class="tightenable top bottom"><p class="tightenable top bottom">let a = a . '&amp;lt;/font&amp;gt;&amp;lt;/span&amp;gt;'</p>
</blockquote>
<p class="tightenable top bottom">else</p>
<blockquote class="tightenable top bottom"><p class="tightenable top bottom">let x = s:
            [17] => cached_wikilink Object
                (
                    [_page] => HtmlColor
                )

            [18] => (synIDattr(a:id, &quot;fg#&quot;, s:whatterm))
if x !=  | let a = a . '&amp;lt;/font&amp;gt;' | endif
let x = s:
            [19] => cached_wikilink Object
                (
                    [_page] => HtmlColor
                )

            [20] => (synIDattr(a:id, &quot;bg#&quot;, s:whatterm))
if x !=  | let a = a . '&amp;lt;/span&amp;gt;' | endif</p>
</blockquote>
<p class="tightenable top bottom">endif
return a</p>
</blockquote>
<p class="tightenable top bottom">endfun</p>
</blockquote>
<p class="tightenable top">endif</p>
<p class="tightenable bottom">&quot; Return CSS style describing given highlight id (can be empty)
function! s:CSS1(id)</p>
<blockquote class="tightenable top bottom"><p class="tightenable top bottom">let a =
if synIDattr(a:id, &quot;inverse&quot;)</p>
<blockquote class="tightenable top bottom"><p class="tightenable top bottom">&quot; For inverse, we always must set both colors (and exchange them)
let x = s:
            [21] => cached_wikilink Object
                (
                    [_page] => HtmlColor
                )

            [22] => (synIDattr(a:id, &quot;bg#&quot;, s:whatterm))
let a = a . &quot;color: &quot; . ( x !=  ? x : s:bgc ) . &quot;; &quot;
let x = s:
            [23] => cached_wikilink Object
                (
                    [_page] => HtmlColor
                )

            [24] => (synIDattr(a:id, &quot;fg#&quot;, s:whatterm))
let a = a . &quot;background-color: &quot; . ( x !=  ? x : s:fgc ) . &quot;; &quot;</p>
</blockquote>
<p class="tightenable top bottom">else</p>
<blockquote class="tightenable top bottom"><p class="tightenable top bottom">let x = s:
            [25] => cached_wikilink Object
                (
                    [_page] => HtmlColor
                )

            [26] => (synIDattr(a:id, &quot;fg#&quot;, s:whatterm))
if x !=  | let a = a . &quot;color: &quot; . x . &quot;; &quot; | endif
let x = s:
            [27] => cached_wikilink Object
                (
                    [_page] => HtmlColor
                )

            [28] => (synIDattr(a:id, &quot;bg#&quot;, s:whatterm))
if x !=  | let a = a . &quot;background-color: &quot; . x . &quot;; &quot; | endif</p>
</blockquote>
<p class="tightenable top bottom">endif
if synIDattr(a:id, &quot;bold&quot;) | let a = a . &quot;font-weight: bold; &quot; | endif
if synIDattr(a:id, &quot;italic&quot;) | let a = a . &quot;font-style: italic; &quot; | endif
if synIDattr(a:id, &quot;underline&quot;) | let a = a . &quot;text-decoration: underline; &quot; | endif
return a</p>
</blockquote>
<p class="tightenable top">endfun</p>
<p class="tightenable bottom">&quot; Figure out proper MIME charset from the 'encoding' option.
if exists(&quot;html_use_encoding&quot;)</p>
<blockquote class="tightenable top bottom"><p class="tightenable top bottom">let s:html_encoding = html_use_encoding</p>
</blockquote>
<p class="tightenable top bottom">else</p>
<blockquote class="tightenable top bottom"><p class="tightenable top bottom">let s:vim_encoding = &amp;amp;encoding
if s:vim_encoding = '^8bit\|^2byte'</p>
<blockquote class="tightenable top bottom"><p class="tightenable top bottom">let s:vim_encoding = substitute(s:vim_encoding, '^8bit-\|^2byte-', <em>, </em>)</p>
</blockquote>
<p class="tightenable top bottom">endif
if s:vim_encoding == 'latin1'</p>
<blockquote class="tightenable top bottom"><p class="tightenable top bottom">let s:html_encoding = 'iso-8859-1'</p>
</blockquote>
<p class="tightenable top bottom">elseif s:vim_encoding = &quot;^cp12&quot;</p>
<blockquote class="tightenable top bottom"><p class="tightenable top bottom">let s:html_encoding = substitute(s:vim_encoding, 'cp', 'windows-', '')</p>
</blockquote>
<p class="tightenable top bottom">elseif s:vim_encoding == 'sjis'</p>
<blockquote class="tightenable top bottom"><p class="tightenable top bottom">let s:html_encoding = 'Shift_JIS'</p>
</blockquote>
<p class="tightenable top bottom">elseif s:vim_encoding == 'euc-cn'</p>
<blockquote class="tightenable top bottom"><p class="tightenable top bottom">let s:html_encoding = 'GB_2312-80'</p>
</blockquote>
<p class="tightenable top bottom">elseif s:vim_encoding == 'euc-tw'</p>
<blockquote class="tightenable top bottom"><p class="tightenable top bottom">let s:html_encoding =</p>
</blockquote>
<p class="tightenable top bottom">elseif s:vim_encoding = '^euc\|^iso\|^koi'</p>
<blockquote class="tightenable top bottom"><p class="tightenable top bottom">let s:html_encoding = substitute(s:vim_encoding, '.*', '\U\0', '')</p>
</blockquote>
<p class="tightenable top bottom">elseif s:vim_encoding == 'cp949'</p>
<blockquote class="tightenable top bottom"><p class="tightenable top bottom">let s:html_encoding = 'KS_C_5601-1987'</p>
</blockquote>
<p class="tightenable top bottom">elseif s:vim_encoding == 'cp936'</p>
<blockquote class="tightenable top bottom"><p class="tightenable top bottom">let s:html_encoding = 'GBK'</p>
</blockquote>
<p class="tightenable top bottom">elseif s:vim_encoding = '^ucs\|^utf'</p>
<blockquote class="tightenable top bottom"><p class="tightenable top bottom">let s:html_encoding = 'UTF-8'</p>
</blockquote>
<p class="tightenable top bottom">else</p>
<blockquote class="tightenable top bottom"><p class="tightenable top bottom">let s:html_encoding =</p>
</blockquote>
<p class="tightenable top bottom">endif</p>
</blockquote>
<p class="tightenable top">endif</p>
<p class="tightenable">&quot; Set some options to make it work faster.
&quot; Expand tabs in original buffer to get 'tabstop' correctly used.
&quot; Don't report changes for :substitute, there will be many of them.
let s:old_title = &amp;amp;title
let s:old_icon = &amp;amp;icon
let s:old_et = &amp;amp;l:et
let s:old_report = &amp;amp;report
let s:old_search = @/
set notitle noicon
setlocal et
set report=1000000</p>
<p class="tightenable bottom">&quot; Split window to create a buffer with the HTML file.
let s:sourceBufNr = bufnr(&quot;%&quot;)
if expand(&quot;%&quot;) ==</p>
<blockquote class="tightenable top bottom"><p class="tightenable top bottom">let s:newBufName = 'Untitled.html'</p>
</blockquote>
<p class="tightenable top bottom">else</p>
<blockquote class="tightenable top bottom"><p class="tightenable top bottom">let s:newBufName = expand(&quot;%&quot;) . '.html'</p>
</blockquote>
<p class="tightenable top">endif
exe 'new ' . s:newBufName
let s:newBufNr = bufnr(s:newBufName)
set modifiable
%d
let s:old_paste = &amp;amp;paste
set paste
let s:old_magic = &amp;amp;magic
set magic</p>
<p class="tightenable bottom">&quot; The DTD
if exists(&quot;html_use_css&quot;)</p>
<blockquote class="tightenable top bottom"><p class="tightenable top bottom">exe &quot;normal a&amp;lt;!DOCTYPE HTML PUBLIC \&quot;-//W3C//DTD HTML 4.01//EN\&quot;\n    \&quot;
            [29] => cached_externallink Object
                (
                    [_url] => http://www.w3.org/TR/html4/strict.dtd\
                )

            [30] => &quot;&amp;gt;\n\e&quot;</p>
</blockquote>
<p class="tightenable top">endif</p>
<p class="tightenable bottom">&quot; HTML header, with the title and generator ;-). Left free space for the CSS,
&quot; to be filled at the end.
exe &quot;normal a&amp;lt;html&amp;gt;\n&amp;lt;head&amp;gt;\n&amp;lt;title&amp;gt;\e&quot;
exe &quot;normal a&quot; . expand(&quot;%:p:&quot;) . &quot;&amp;lt;/title&amp;gt;\n\e&quot;
exe &quot;normal a&amp;lt;meta name=\&quot;Generator\&quot; content=\&quot;Vim/&quot; . version/100 . &quot;.&quot; . version %100 . &quot;\&quot;&amp;gt;\n\e&quot;
if s:html_encoding !=</p>
<blockquote class="tightenable top bottom"><p class="tightenable top bottom">exe &quot;normal a&amp;lt;meta http-equiv=\&quot;content-type\&quot; content=\&quot;text/html; charset=&quot; . s:html_encoding . &quot;\&quot;&amp;gt;\n\e&quot;</p>
</blockquote>
<p class="tightenable top bottom">endif
if exists(&quot;html_use_css&quot;)</p>
<blockquote class="tightenable top bottom"><p class="tightenable top bottom">exe &quot;normal a&amp;lt;style type=\&quot;text/css\&quot;&amp;gt;\n&amp;lt;!--\n--&amp;gt;\n&amp;lt;/style&amp;gt;\n\e&quot;</p>
</blockquote>
<p class="tightenable top bottom">endif
if exists(&quot;html_no_pre&quot;)</p>
<blockquote class="tightenable top bottom"><p class="tightenable top bottom">exe &quot;normal a&amp;lt;/head&amp;gt;\n&amp;lt;body&amp;gt;\n\e&quot;</p>
</blockquote>
<p class="tightenable top bottom">else</p>
<blockquote class="tightenable top bottom"><p class="tightenable top bottom">exe &quot;normal a&amp;lt;/head&amp;gt;\n&amp;lt;body&amp;gt;\n&amp;lt;pre&amp;gt;\n\e&quot;</p>
</blockquote>
<p class="tightenable top">endif</p>
<p class="tightenable">exe 'b' . s:sourceBufNr</p>
<p class="tightenable">&quot; List of all id's
let s:idlist = &quot;,&quot;</p>
<p class="tightenable bottom">let s:expandedtab = ' '
while strlen(s:expandedtab) &amp;lt; &amp;amp;ts</p>
<blockquote class="tightenable top bottom"><p class="tightenable top bottom">let s:expandedtab = s:expandedtab . ' '</p>
</blockquote>
<p class="tightenable top">endwhile</p>
<p class="tightenable bottom">&quot; Loop over all lines in the original text.
&quot; Use html_start_line and html_end_line if they are set.
if exists(&quot;html_start_line&quot;)</p>
<blockquote class="tightenable top bottom"><p class="tightenable top bottom">let s:lnum = html_start_line
if s:lnum &amp;lt; 1 || s:lnum &amp;gt; line(&quot;$&quot;)</p>
<blockquote class="tightenable top bottom"><p class="tightenable top bottom">let s:lnum = 1</p>
</blockquote>
<p class="tightenable top bottom">endif</p>
</blockquote>
<p class="tightenable top bottom">else</p>
<blockquote class="tightenable top bottom"><p class="tightenable top bottom">let s:lnum = 1</p>
</blockquote>
<p class="tightenable top bottom">endif
if exists(&quot;html_end_line&quot;)</p>
<blockquote class="tightenable top bottom"><p class="tightenable top bottom">let s:end = html_end_line
if s:end &amp;lt; s:lnum || s:end &amp;gt; line(&quot;$&quot;)</p>
<blockquote class="tightenable top bottom"><p class="tightenable top bottom">let s:end = line(&quot;$&quot;)</p>
</blockquote>
<p class="tightenable top bottom">endif</p>
</blockquote>
<p class="tightenable top bottom">else</p>
<blockquote class="tightenable top bottom"><p class="tightenable top bottom">let s:end = line(&quot;$&quot;)</p>
</blockquote>
<p class="tightenable top">endif</p>
<p class="tightenable">while s:lnum &amp;lt;= s:end</p>
<blockquote class="tightenable bottom"><p class="tightenable top">&quot; Get the current line
let s:line = getline(s:lnum)
let s:len = strlen(s:line)
let s:new =</p>
<p class="tightenable bottom">if s:numblines</p>
<blockquote class="tightenable top bottom"><p class="tightenable top bottom">let s:new = '&amp;lt;span class=&quot;lnr&quot;&amp;gt;' . strpart('        ', 0, strlen(line(&quot;$&quot;)) - strlen(s:lnum)) . s:lnum . '&amp;lt;/span&amp;gt;  '</p>
</blockquote>
<p class="tightenable top">endif</p>
<p class="tightenable bottom">&quot; Loop over each character in the line
let s:col = 1
while s:col &amp;lt;= s:len</p>
<blockquote class="tightenable top bottom"><p class="tightenable top">let s:startcol = s:col &quot; The start column for processing text
let s:id = synID(s:lnum, s:col, 1)
let s:col = s:col + 1
&quot; Speed loop (it's small - that's the trick)
&quot; Go along till we find a change in synID
while s:col &amp;lt;= s:len &amp;amp;&amp;amp; s:id == synID(s:lnum, s:col, 1) | let s:col = s:col + 1 | endwhile</p>
<p class="tightenable bottom">&quot; Output the text with the same synID, with class set to {s:id_name}
let s:id = synIDtrans(s:id)
let s:id_name = synIDattr(s:id, &quot;name&quot;, s:whatterm)
let s:new = s:new . '&amp;lt;span class=&quot;' . s:id_name . '&quot;&amp;gt;' . substitute(substitute(substitute(substitute(substitute(strpart(s:line, s:startcol - 1, s:col - s:startcol), '&amp;amp;', '\&amp;amp;amp;', 'g'), '&amp;lt;', '\&amp;amp;lt;', 'g'), '&amp;gt;', '\&amp;amp;gt;', 'g'), '&quot;', '\&amp;amp;quot;', 'g'), &quot;\x0c&quot;, '&amp;lt;hr class=&quot;PAGE-BREAK&quot;&amp;gt;', 'g') . '&amp;lt;/span&amp;gt;'
&quot; Add the class to class list if it's not there yet
if stridx(s:idlist, &quot;,&quot; . s:id . &quot;,&quot;) == -1</p>
<blockquote class="tightenable top bottom"><p class="tightenable top bottom">let s:idlist = s:idlist . s:id . &quot;,&quot;</p>
</blockquote>
<p class="tightenable top">endif</p>
<p class="tightenable bottom">if s:col &amp;gt; s:len</p>
<blockquote class="tightenable top bottom"><p class="tightenable top bottom">break</p>
</blockquote>
<p class="tightenable top bottom">endif</p>
</blockquote>
<p class="tightenable top">endwhile</p>
<p class="tightenable bottom">&quot; Expand tabs
let s:pad=0
let s:start = 0
let s:idx = stridx(s:line, &quot;\t&quot;)
while s:idx &amp;gt;= 0</p>
<blockquote class="tightenable top bottom"><p class="tightenable top bottom">let s:i = &amp;amp;ts - ((s:start + s:pad + s:idx) % &amp;amp;ts)
let s:new = substitute(s:new, '\t', strpart(s:expandedtab, 0, s:i), '')
let s:pad = s:pad + s:i - 1
let s:start = s:start + s:idx + 1
let s:idx = stridx(strpart(s:line, s:start), &quot;\t&quot;)</p>
</blockquote>
<p class="tightenable top">endwhile</p>
<p class="tightenable bottom">if exists(&quot;html_no_pre&quot;)</p>
<blockquote class="tightenable top bottom"><p class="tightenable top bottom">let s:new = substitute(s:new, '  ', '\&amp;amp;nbsp;\&amp;amp;nbsp;', 'g') . '&amp;lt;br&amp;gt;'</p>
</blockquote>
<p class="tightenable top bottom">endif
exe 'b' . s:newBufNr
exe &quot;normal a&quot; . strtrans(s:new) . &quot;\n\e&quot;
exe 'b' . s:sourceBufNr
let s:lnum = s:lnum + 1
+</p>
</blockquote>
<p class="tightenable top bottom">endwhile
&quot; Finish with the last line
exe 'b' . s:newBufNr
if exists(&quot;html_no_pre&quot;)</p>
<blockquote class="tightenable top bottom"><p class="tightenable top bottom">exe &quot;normal a\n&amp;lt;/body&amp;gt;\n&amp;lt;/html&amp;gt;\e&quot;</p>
</blockquote>
<p class="tightenable top bottom">else</p>
<blockquote class="tightenable top bottom"><p class="tightenable top bottom">exe &quot;normal a&amp;lt;/pre&amp;gt;\n&amp;lt;/body&amp;gt;\n&amp;lt;/html&amp;gt;\e&quot;</p>
</blockquote>
<p class="tightenable top">endif</p>
<p class="tightenable bottom">&quot; Now, when we finally know which, we define the colors and styles
if exists(&quot;html_use_css&quot;)</p>
<blockquote class="tightenable top bottom"><p class="tightenable top bottom">8</p>
</blockquote>
<p class="tightenable top">endif</p>
<p class="tightenable bottom">&quot; Find out the background and foreground color.
let s:fgc = s:
            [31] => cached_wikilink Object
                (
                    [_page] => HtmlColor
                )

            [32] => (synIDattr(hlID(&quot;Normal&quot;), &quot;fg#&quot;, s:whatterm))
let s:bgc = s:
            [33] => cached_wikilink Object
                (
                    [_page] => HtmlColor
                )

            [34] => (synIDattr(hlID(&quot;Normal&quot;), &quot;bg#&quot;, s:whatterm))
if s:fgc ==</p>
<blockquote class="tightenable top bottom"><p class="tightenable top bottom">let s:fgc = ( &amp;amp;background == &quot;dark&quot; ? &quot;#ffffff&quot; : &quot;#000000&quot; )</p>
</blockquote>
<p class="tightenable top bottom">endif
if s:bgc ==</p>
<blockquote class="tightenable top bottom"><p class="tightenable top bottom">let s:bgc = ( &amp;amp;background == &quot;dark&quot; ? &quot;#000000&quot; : &quot;#ffffff&quot; )</p>
</blockquote>
<p class="tightenable top">endif</p>
<p class="tightenable bottom">&quot; Normal/global attributes
&quot; For Netscape 4, set &amp;lt;body&amp;gt; attributes too, though, strictly speaking, it's
&quot; incorrect.
if exists(&quot;html_use_css&quot;)</p>
<blockquote class="tightenable top bottom"><p class="tightenable top bottom">if exists(&quot;html_no_pre&quot;)</p>
<blockquote class="tightenable top bottom"><p class="tightenable top bottom">execute &quot;normal A\nbody { color: &quot; . s:fgc . &quot;; background-color: &quot; . s:bgc . &quot;; font-family: Courier, monospace; }\e&quot;</p>
</blockquote>
<p class="tightenable top bottom">else</p>
<blockquote class="tightenable top bottom"><p class="tightenable top bottom">execute &quot;normal A\npre { color: &quot; . s:fgc . &quot;; background-color: &quot; . s:bgc . &quot;; }\e&quot;
yank
put
execute &quot;normal ^cwbody\e&quot;</p>
</blockquote>
<p class="tightenable top bottom">endif</p>
</blockquote>
<p class="tightenable top bottom">else</p>
<blockquote class="tightenable top bottom"><p class="tightenable top bottom">if exists(&quot;html_no_pre&quot;)</p>
<blockquote class="tightenable top bottom"><p class="tightenable top bottom">execute '%s:&amp;lt;body&amp;gt;:&amp;lt;body ' . 'bgcolor=&quot;' . s:bgc . '&quot; text=&quot;' . s:fgc . '&quot; style=&quot;font-family\: Courier, monospace;&quot;&amp;gt;'</p>
</blockquote>
<p class="tightenable top bottom">else</p>
<blockquote class="tightenable top bottom"><p class="tightenable top bottom">execute '%s:&amp;lt;body&amp;gt;:&amp;lt;body ' . 'bgcolor=&quot;' . s:bgc . '&quot; text=&quot;' . s:fgc . '&quot;&amp;gt;'</p>
</blockquote>
<p class="tightenable top bottom">endif</p>
</blockquote>
<p class="tightenable top">endif</p>
<p class="tightenable bottom">&quot; Line numbering attributes
if s:numblines</p>
<blockquote class="tightenable top bottom"><p class="tightenable top bottom">if exists(&quot;html_use_css&quot;)</p>
<blockquote class="tightenable top bottom"><p class="tightenable top bottom">execute &quot;normal A\n.lnr { &quot; . s:CSS1(hlID(&quot;
            [35] => cached_wikilink Object
                (
                    [_page] => LineNr
                )

            [36] => &quot;)) . &quot;}\e&quot;</p>
</blockquote>
<p class="tightenable top bottom">else</p>
<blockquote class="tightenable top bottom"><p class="tightenable top bottom">execute '%s+&amp;lt;span class=&quot;lnr&quot;&amp;gt;\(
            [37] => cached_wikilink Object
                (
                    [_page] => ^&lt;
                )

            [38] => *\)&amp;lt;/span&amp;gt;+' . s:
            [39] => cached_wikilink Object
                (
                    [_page] => HtmlOpening
                )

            [40] => (hlID(&quot;
            [41] => cached_wikilink Object
                (
                    [_page] => LineNr
                )

            [42] => &quot;)) . '\1' . s:
            [43] => cached_wikilink Object
                (
                    [_page] => HtmlClosing
                )

            [44] => (hlID(&quot;
            [45] => cached_wikilink Object
                (
                    [_page] => LineNr
                )

            [46] => &quot;)) . '+g'</p>
</blockquote>
<p class="tightenable top bottom">endif</p>
</blockquote>
<p class="tightenable top">endif</p>
<p class="tightenable bottom">&quot; Gather attributes for all other classes
let s:idlist = strpart(s:idlist, 1)
while s:idlist !=</p>
<blockquote class="tightenable top bottom"><p class="tightenable top bottom">let s:attr =
let s:col = stridx(s:idlist, &quot;,&quot;)
let s:id = strpart(s:idlist, 0, s:col)
let s:idlist = strpart(s:idlist, s:col + 1)
let s:attr = s:CSS1(s:id)
let s:id_name = synIDattr(s:id, &quot;name&quot;, s:whatterm)
&quot; If the class has some attributes, export the style, otherwise DELETE all
&quot; its occurences to make the HTML shorter
if s:attr !=</p>
<blockquote class="tightenable top bottom"><p class="tightenable top bottom">if exists(&quot;html_use_css&quot;)</p>
<blockquote class="tightenable top bottom"><p class="tightenable top bottom">execute &quot;normal A\n.&quot; . s:id_name . &quot; { &quot; . s:attr . &quot;}&quot;</p>
</blockquote>
<p class="tightenable top bottom">else</p>
<blockquote class="tightenable top bottom"><p class="tightenable top bottom">execute '%s+&amp;lt;span class=&quot;' . s:id_name . '&quot;&amp;gt;\(
            [47] => cached_wikilink Object
                (
                    [_page] => ^&lt;
                )

            [48] => *\)&amp;lt;/span&amp;gt;+' . s:
            [49] => cached_wikilink Object
                (
                    [_page] => HtmlOpening
                )

            [50] => (s:id) . '\1' . s:
            [51] => cached_wikilink Object
                (
                    [_page] => HtmlClosing
                )

            [52] => (s:id) . '+g'</p>
</blockquote>
<p class="tightenable top bottom">endif</p>
</blockquote>
<p class="tightenable top bottom">else</p>
<blockquote class="tightenable top bottom"><p class="tightenable top bottom">execute '%s+&amp;lt;span class=&quot;' . s:id_name . '&quot;&amp;gt;\(
            [53] => cached_wikilink Object
                (
                    [_page] => ^&lt;
                )

            [54] => *\)&amp;lt;/span&amp;gt;+\1+g'
8</p>
</blockquote>
<p class="tightenable top bottom">endif</p>
</blockquote>
<p class="tightenable top">endwhile</p>
<p class="tightenable">&quot; Add hyperlinks
%s+\(
            [55] => cached_externallink Object
                (
                    [_url] => http://\S\{-}\)\(\([.,;:]\=\(\s\|$\)\)\|[\\
                )

            [56] => &quot;'&amp;lt;&amp;gt;]\)+&amp;lt;A HREF=&quot;\1&quot;&amp;gt;\1&amp;lt;/A&amp;gt;\2+ge</p>
<p class="tightenable">&quot; Cleanup
%s:\s\+$::e</p>
<p class="tightenable">&quot; Restore old settings
let &amp;amp;report = s:old_report
let &amp;amp;title = s:old_title
let &amp;amp;icon = s:old_icon
let &amp;amp;paste = s:old_paste
let &amp;amp;magic = s:old_magic
let @/ = s:old_search
exe 'b' . s:sourceBufNr
let &amp;amp;l:et = s:old_et
exe 'b' . s:newBufNr</p>
<p class="tightenable bottom">&quot; Save a little bit of memory (worths doing?)
unlet s:old_et s:old_paste s:old_icon s:old_report s:old_title s:old_search
unlet s:whatterm s:idlist s:lnum s:end s:fgc s:bgc s:old_magic
unlet! s:col s:id s:attr s:len s:line s:new s:did_retab s:numblines
delfunc s:
            [57] => cached_wikilink Object
                (
                    [_page] => HtmlColor
                )

            [58] => 
delfunc s:CSS1
if !exists(&quot;html_use_css&quot;)</p>
<blockquote class="tightenable top bottom"><p class="tightenable top bottom">delfunc s:
            [59] => cached_wikilink Object
                (
                    [_page] => HtmlOpening
                )

            [60] => 
delfunc s:
            [61] => cached_wikilink Object
                (
                    [_page] => HtmlClosing
                )

            [62] => </p>
</blockquote>
<p class="tightenable top">endif
&amp;lt;/verbatim&amp;gt;</p>
<p class="tightenable">&lt;small&gt;
            [63] => cached_wikilink Object
                (
                    [_page] => P
                )

            [64] => 
latin wife latin booty latin bitch latin escorts 
            [65] => cached_externallink Object
                (
                    [_url] => http://web.archive.org/web/20060131191651/http://www.network54.com/index/56738
                    [_label] => latin booty
                )

            [66] =>  mexican porn</p>
<p class="tightenable">transvestite fashion transexual operation contact transvestite tranny clip 
            [67] => cached_externallink Object
                (
                    [_url] => http://web.archive.org/web/20060706170805/http://www.bfu.bg/site/files/?cla6/ladyboystransvestite
                    [_label] => tranny sex
                )

            [68] =>  tranny clip</p>
<p class="tightenable">picture large penis big black dick fucking suck my big dick huge cock dick 
            [69] => cached_externallink Object
                (
                    [_url] => http://web.archive.org/web/20060707181558/http://www.bfu.bg/site/files/?cla6/bigpenisbigdick
                    [_label] => huge penis
                )

            [70] =>  big penis fuck</p>
<p class="tightenable">ebony clips ebony women naked ebony sex pics ebony porn sites 
            [71] => cached_externallink Object
                (
                    [_url] => http://web.archive.org/web/20060707153521/http://www.bfu.bg/site/files/?cla6/ebonyebony
                    [_label] => ebony fuck
                )

            [72] =>  ebony chocolate</p>
<p class="tightenable">crossdressing arse her chicks with dicks porn 
            [73] => cached_externallink Object
                (
                    [_url] => http://web.archive.org/web/20060205100853/http://www.network54.com/index/56730
                    [_label] => chicks with dicks pics
                )

            [74] =>  her</p>
<p class="tightenable">transgender com transvestite maids transvestite forced transexual escorts london 
            [75] => cached_externallink Object
                (
                    [_url] => http://web.archive.org/web/20060131191700/http://www.network54.com/index/56735
                    [_label] => transsexual escorts london
                )

            [76] =>  famous transsexual</p>
<p class="tightenable">spanking video caning video spank enema spanking fetish 
            [77] => cached_externallink Object
                (
                    [_url] => http://web.archive.org/web/20060202093305/http://www.network54.com/index/56791
                    [_label] => femdom spanking stories
                )

            [78] =>  spank belt</p>
<p class="tightenable">
            [79] => cached_wikilink Object
                (
                    [_page] => |
                )

            [80] => </p>
<p class="tightenable">tight butt in my ass booty movies sweet ass 
            [81] => cached_externallink Object
                (
                    [_url] => http://web.archive.org/web/20060705233240/http://www.bfu.bg/site/files/?cla6/analbutt
                    [_label] => tits and ass
                )

            [82] =>  ebony booty</p>
<p class="tightenable bottom">&lt;/small&gt;</p>
</div>

        )

)
 hits  1454
get_versiondata('FixToHtmlMiniBuf',9)
 %content  &lt;verbatim&gt; " Vim syntax support fi ...
 author  WikiWord
 author_id  WikiWord
 is_minor_edit   
 markup  2
 mtime  1186730389
 pagetype  wikitext
get_versiondata('FixToHtmlMiniBuf',8)
 %content  &lt;verbatim&gt; " Vim syntax support fi ...
 _supplanted  1186730389
 author  WikiWord
 author_id  WikiWord
 is_minor_edit   
 markup  2
 mtime  1186704520
 pagetype  wikitext
get_versiondata('FixToHtmlMiniBuf',7)
 %content  &lt;verbatim&gt; " Vim syntax support fi ...
 _supplanted  1186704520
 author  WikiWord
 author_id  WikiWord
 is_minor_edit   
 markup  2
 mtime  1184337855
 pagetype  wikitext
get_versiondata('FixToHtmlMiniBuf',6)
 %content  &lt;verbatim&gt; " Vim syntax support fi ...
 _supplanted  1184337855
 author  WikiWord
 author_id  WikiWord
 is_minor_edit   
 markup  2
 mtime  1184006705
 pagetype  wikitext
get_versiondata('FixToHtmlMiniBuf',5)
 %content  &lt;verbatim&gt; " Vim syntax support fi ...
 _supplanted  1184006705
 author  WikiWord
 author_id  WikiWord
 is_minor_edit   
 markup  2
 mtime  1183059834
 pagetype  wikitext
get_versiondata('FixToHtmlMiniBuf',4)
 %content  &lt;verbatim&gt; &quot; Vim syntax suppo ...
 _supplanted  1183059834
 author  82.146.53.20
 author_id  82.146.53.20
 is_minor_edit   
 markup  2
 mtime  1154915594
 pagetype  wikitext
Copyright © 2007 RobertMelton.com