blob: c07c2c3c7458cb65d06e900397dc5cd2fe5a0488 (
plain)
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
56
|
" MNV plugin for using MNV as manpager.
" Maintainer: Enno Nagel <ennonagel+mnv@gmail.com>
" Last Change: 2024 Jul 03
" 2026 Mar 22 by MNV Project: strip OSC 9 sequences (#19787)
" 2026 Mar 24 by MNV Project: strip Bell char: Ctrl-G (#19807)
if exists('g:loaded_manpager_plugin')
finish
endif
let g:loaded_manpager_plugin = 1
" Set up the current buffer (likely read from stdin) as a manpage
command MANPAGER call s:ManPager()
function s:ManPager()
" global options, keep these to a minimum to avoid side effects
if &compatible
set nocompatible
endif
if exists('+mnvinfofile')
set mnvinfofile=NONE
endif
syntax on
" Ensure text width matches window width
setlocal foldcolumn& nofoldenable nonumber norelativenumber
" In case MNV was invoked with -M
setlocal modifiable
" Emulate 'col -b'
exe 'silent! keepj keepp %s/\v(.)\b\ze\1?//e' .. (&gdefault ? '' : 'g')
" Remove ansi sequences
exe 'silent! keepj keepp %s/\v\e\[%(%(\d;)?\d{1,2})?[mK]//e' .. (&gdefault ? '' : 'g')
" Remove OSC 8 hyperlink sequences: \e]8;;...\e\ or \e]8;;...<BEL>
exe 'silent! keepj keepp %s/\v\e\]8;[^\x07\e]*%(%x07|\e\\)//e' .. (&gdefault ? '' : 'g')
" Remove empty lines above the header
call cursor(1, 1)
let n = search(".*(.*)", "c")
if n > 1
exe "1," . n-1 . "d"
endif
" Finished preprocessing the buffer, prevent any further modifications
setlocal nomodified nomodifiable
" Make this an unlisted, readonly scratch buffer
setlocal buftype=nofile noswapfile bufhidden=hide nobuflisted readonly
" Set filetype to man even if ftplugin is disabled
setlocal filetype=man
runtime ftplugin/man.mnv
endfunction
|
