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
57
58
59
60
61
62
63
64
65
66
67
68
69
70
" ------------- - ------------------------------------------------------------
" File          : autoload/unite/sources/outline/defaults/man.vim
" Author        : Zhao Cai
" Email         : caizhaoff@gmail.com
" URL           :
" Version       : 0.1
" Date Created  : Wed 25 Jul 2012 03:28:54 PM EDT
" Last Modified : Thu 09 Aug 2012 02:39:40 AM EDT
"
" Licensed under the MIT license:
" http://www.opensource.org/licenses/mit-license.php
" ------------- - ------------------------------------------------------------


"---------------------------------------
" Sub Patterns

let s:man_section_heading           = '[a-zA-Z][a-zA-Z -_]*[a-zA-Z]'
let s:man_sub_heading_leading_space = '\s\{3\}'
let s:man_sub_heading               = s:man_sub_heading_leading_space . s:man_section_heading

"-----------------------------------------------------------------------------
" Outline Info
"
" Assume: (no syntax callback from unite-outline)
"   unite#get_current_unite().abbr_head == 3
"
let s:outline_info = {
            \ 'heading': '^\(' . s:man_section_heading . '\|' . s:man_sub_heading . '\)$',
            \
            \ 'highlight_rules': [
            \   { 'name'      : 'H1',
            \     'pattern'   : '/\%3c' . s:man_section_heading . '/',
            \     'highlight' : 'htmlH1',
            \   },
            \   { 'name'      : 'H2',
            \     'pattern'   : '/\%3c\s\+' . s:man_section_heading . '/',
            \     'highlight' : 'htmlH2'
            \   },
            \ ],
            \}


function! s:outline_info.create_heading(which, heading_line, matched_line, context) abort

    let heading = {
                \ 'word' : a:heading_line,
                \ 'level': 0,
                \ 'type' : 'generic',
                \ }

    if a:heading_line =~ '^' . s:man_section_heading . '$'
        let heading.level = 1
    elseif a:heading_line =~ '^' . s:man_sub_heading . '$'
        let heading.level = 2
    endif

    if heading.level > 0
        return heading
    else
        return {}
    endif
endfunction


" Default outline info for man files

function! unite#sources#outline#defaults#man#outline_info() abort
    return s:outline_info
endfunction