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
"=============================================================================
" File    : autoload/unite/sources/outline/defaults/hatena.vim
" Author  : aereal <aereal@aereal.org>
" Updated : 2012-12-20
"
" Licensed under the MIT license:
" http://www.opensource.org/licenses/mit-license.php
"
"=============================================================================

" Default outline info for Hatena annotation
" Version: 0.0.1

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

let s:outline_info = {
      \ 'heading'  : '^\*\+',
      \ }

function! s:outline_info.create_heading(which, heading_line, matched_line, context) abort
  let heading = {
        \ 'word' : a:heading_line,
        \ 'level': strlen(matchstr(a:heading_line, '^*\+')),
        \ 'type' : 'generic',
        \ }

  if a:which ==# 'heading'
    let heading.level = strlen(matchstr(a:heading_line, '^*\+'))
    let heading.word = substitute(heading.word, '^\*\+\s*', '', '')
    let heading.word = substitute(heading.word, '\s*\*\+\s*$', '', '')
  endif

  if heading.level > 0
    let heading.word = substitute(heading.word, '\s*<a[^>]*>\s*\%(</a>\s*\)\=$', '', '')
    return heading
  else
    return {}
  endif
endfunction