| ' .. bufname(buf) .. ' | ') endfor add(html, '||
|---|---|---|
')
elseif settings.use_xhtml
add(html, ' ')
else
add(html, ' | ')
# Close this buffer
# TODO: the comment above says we're going to allow saving the file
# later...but here we discard it?
quit!
endfor
if !settings.no_doc
html[body_line_num] = body_line
endif
add(html, '')
endif
html += temp
add(html, ' |
block
if !user_settings.use_css
user_settings.no_pre = 1
endif
# pre_wrap doesn't do anything if not using pre or not using CSS
if user_settings.no_pre || !user_settings.use_css
user_settings.pre_wrap = 0
endif
#}}}
# set up expand_tabs option after all the overrides so we know the
# appropriate defaults #{{{
if user_settings.no_pre == 0
GetOption(user_settings,
'expand_tabs',
&expandtab || &ts != 8 || &vts != '' || user_settings.number_lines ||
(user_settings.dynamic_folds && !user_settings.no_foldcolumn))
else
user_settings.expand_tabs = 1
endif
# }}}
# textual options
if exists("g:html_use_encoding") #{{{
# user specified the desired MIME charset, figure out proper
# 'fileencoding' from it or warn the user if we cannot
user_settings.encoding = g:html_use_encoding
user_settings.vim_encoding = EncodingFromCharset(g:html_use_encoding)
if user_settings.vim_encoding == ''
echohl WarningMsg
echomsg "TOhtml: file encoding for" g:html_use_encoding "unknown, please set 'fileencoding'"
echohl None
endif
else
# Figure out proper MIME charset from 'fileencoding' if possible
if &l:fileencoding != ''
# If the buffer is not a "normal" type, the 'fileencoding' value may not
# be trusted; since the buffer should not be written the fileencoding is
# not intended to be used.
if &l:buftype == '' || &l:buftype ==? 'help'
user_settings.vim_encoding = &l:fileencoding
CharsetFromEncoding(user_settings)
else
user_settings.encoding = '' # trigger detection using &encoding
endif
endif
# else from 'encoding' if possible
if &l:fileencoding == '' || user_settings.encoding == ''
user_settings.vim_encoding = &encoding
CharsetFromEncoding(user_settings)
endif
# else default to UTF-8 and warn user
if user_settings.encoding == ''
user_settings.vim_encoding = 'utf-8'
user_settings.encoding = 'UTF-8'
echohl WarningMsg
echomsg "TOhtml: couldn't determine MIME charset, using UTF-8"
echohl None
endif
endif #}}}
# Default to making nothing uncopyable, because we default to
# not-standards way of doing things, and also because Microsoft Word and
# others paste the elements anyway.
#
# html_prevent_copy only has an effect when using CSS.
#
# All options:
# f - fold column
# n - line numbers (also within fold text)
# t - fold text
# d - diff filler
# c - concealed text (reserved future)
# l - listchars (reserved possible future)
# s - signs (reserved possible future)
#
# Normal text is always selectable.
user_settings.prevent_copy = ""
if user_settings.use_css
if exists("g:html_prevent_copy")
if user_settings.dynamic_folds && !user_settings.no_foldcolumn && g:html_prevent_copy =~# 'f'
user_settings.prevent_copy ..= 'f'
endif
if user_settings.number_lines && g:html_prevent_copy =~# 'n'
user_settings.prevent_copy ..= 'n'
endif
if &diff && g:html_prevent_copy =~# 'd'
user_settings.prevent_copy ..= 'd'
endif
if !user_settings.ignore_folding && g:html_prevent_copy =~# 't'
user_settings.prevent_copy ..= 't'
endif
else
user_settings.prevent_copy = ""
endif
endif
if empty(user_settings.prevent_copy)
user_settings.no_invalid = 0
endif
# enforce valid values for use_input_for_pc
if user_settings.use_input_for_pc !~# 'fallback\|none\|all'
user_settings.use_input_for_pc = 'none'
echohl WarningMsg
echomsg '2html: "' .. g:html_use_input_for_pc .. '" is not valid for g:html_use_input_for_pc'
echomsg '2html: defaulting to "' .. user_settings.use_input_for_pc .. '"'
echohl None
sleep 3
endif
if exists('g:html_id_expr')
user_settings.id_suffix = eval(g:html_id_expr)
if user_settings.id_suffix !~ '^[-_:.A-Za-z0-9]*$'
echohl WarningMsg
echomsg '2html: g:html_id_expr evaluated to invalid string for HTML id attributes'
echomsg '2html: Omitting user-specified suffix'
echohl None
sleep 3
user_settings.id_suffix = ""
endif
else
user_settings.id_suffix = ""
endif
# TODO: font
return user_settings
endif
enddef #}}}
# get the proper HTML charset name from a Vim encoding option.
export def CharsetFromEncoding(_settings: dict) #{{{
var vim_encoding = _settings.vim_encoding
if exists('g:html_charset_override') && has_key(g:html_charset_override, vim_encoding)
_settings.encoding = g:html_charset_override[vim_encoding]
else
if vim_encoding =~ '^8bit\|^2byte'
# 8bit- and 2byte- prefixes are to indicate encodings available on the
# system that Vim will convert with iconv(), look up just the encoding name,
# not Vim's prefix.
vim_encoding = substitute(vim_encoding, '^8bit-\|^2byte-', '', '')
endif
if has_key(encoding_to_charset, vim_encoding)
_settings.encoding = encoding_to_charset[vim_encoding]
else
_settings.encoding = ""
endif
endif
if _settings.encoding != ""
var vim_encoding2 = EncodingFromCharset(_settings.encoding)
if vim_encoding2 != ""
# if the Vim encoding to HTML encoding conversion is set up (by default or
# by the user) to convert to a different encoding, we need to also change
# the Vim encoding of the new buffer
_settings.vim_encoding = vim_encoding2
endif
endif
enddef #}}}
# Get the proper Vim encoding option setting from an HTML charset name.
export def EncodingFromCharset(encoding: string): string #{{{
if exists('g:html_encoding_override') && has_key(g:html_encoding_override, encoding)
return g:html_encoding_override[encoding]
elseif has_key(charset_to_encoding, tolower(encoding))
return charset_to_encoding[tolower(encoding)]
else
return ""
endif
enddef #}}}
# Make sure any patches will probably use consistent indent
# vim: ts=8 sw=2 sts=2 noet fdm=marker