1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
|
" Vim compiler file
" Compiler: Pandoc
" Maintainer: Konfekt
"
" Expects output file extension, say `:make html` or `:make pdf`.
" Passes additional arguments to pandoc, say `:make html --self-contained`.
if exists("current_compiler")
finish
endif
let s:keepcpo = &cpo
set cpo&vim
let current_compiler = 'pandoc'
" As of 2024-04-08 pandoc supports the following text input formats with
" an ftplugin on Github:
let s:supported_filetypes =
\ [ 'bibtex', 'markdown', 'creole', 'json', 'csv', 'tsv', 'docbook',
\ 'xml', 'fb2', 'html', 'jira', 'tex', 'mediawiki', 'nroff', 'org',
\ 'rtf', 'rst', 't2t', 'textile', 'twiki', 'typst', 'vimwiki' ]
" .. and out of those the following are included in Vim's runtime:
" 'xml', 'tex', 'html', 'rst', 'json', 'nroff', 'markdown'
silent! function s:PandocFiletype(filetype) abort
let ft = a:filetype
if ft ==# 'pandoc'
return 'markdown'
elseif ft ==# 'tex'
return 'latex'
elseif ft ==# 'xml'
" Pandoc does not support XML as a generic input format, but it does support
" EndNote XML and Jats XML out of which the latter seems more universal.
return 'jats'
elseif ft ==# 'text' || empty(ft)
return 'markdown'
elseif index(s:supported_filetypes, &ft) >= 0
return ft
else
echomsg 'Unsupported filetype: ' . ft . ', falling back to Markdown as input format!'
return 'markdown'
endif
endfunction
execute 'CompilerSet makeprg=pandoc\ --standalone' .
\ '\ --metadata\ title=%:t:r:S' .
\ '\ --metadata\ lang=' . matchstr(&spelllang, '^\a\a') .
\ '\ --from=' . s:PandocFiletype(&filetype) .
\ '\ ' . escape(get(b:, 'pandoc_compiler_args', get(g:, 'pandoc_compiler_args', '')), ' ') .
\ '\ --output\ %:r:S.$*\ %:S'
CompilerSet errorformat="%f",\ line\ %l:\ %m
let &cpo = s:keepcpo
unlet s:keepcpo
|
