Bram Moolenaar | b20545f | 2016-04-30 14:15:54 +0200 | [diff] [blame] | 1 | " Vim plugin for using Vim as manpager. |
| 2 | " Maintainer: Enno Nagel <ennonagel+vim@gmail.com> |
| 3 | " Last Change: 2016 Apr 30 |
| 4 | |
| 5 | " $MAN_PN is supposed to be set by MANPAGER, see ":help manpager.vim". |
| 6 | if empty($MAN_PN) |
| 7 | finish |
| 8 | endif |
| 9 | |
| 10 | command! -nargs=0 MANPAGER call s:MANPAGER() | delcommand MANPAGER |
| 11 | |
| 12 | function! s:MANPAGER() |
| 13 | let page_pattern = '\v\w+%([-_.]\w+)*' |
| 14 | let sec_pattern = '\v\w+%(\+\w+)*' |
| 15 | let pagesec_pattern = '\v(' . page_pattern . ')\((' . sec_pattern . ')\)' |
| 16 | |
| 17 | if $MAN_PN is '1' |
| 18 | let manpage = matchstr( getline(1), '^' . pagesec_pattern ) |
| 19 | else |
| 20 | let manpage = expand('$MAN_PN') |
| 21 | endif |
| 22 | |
| 23 | let page_sec = matchlist( manpage, '^' . pagesec_pattern . '$') |
| 24 | |
| 25 | bwipe! |
| 26 | |
| 27 | setlocal filetype=man |
| 28 | exe 'Man' page_sec[3] page_sec[1] |
| 29 | endfunction |