28 lines
1.0 KiB
VimL
28 lines
1.0 KiB
VimL
|
scriptencoding utf-8
|
|||
|
|
|||
|
function! emmet#lorem#ja#expand(command) abort
|
|||
|
let wcount = matchstr(a:command, '^\%(lorem\|lipsum\)\(\d*\)}$', '\1', '')
|
|||
|
let wcount = wcount > 0 ? wcount : 30
|
|||
|
|
|||
|
let url = "http://www.aozora.gr.jp/cards/000081/files/470_15407.html"
|
|||
|
let content = emmet#util#cache(url)
|
|||
|
if len(content) == 0
|
|||
|
let content = emmet#util#getContentFromURL(url)
|
|||
|
let content = matchstr(content, '<div[^>]*>\zs.\{-}</div>')
|
|||
|
let content = substitute(content, '[ \r]', '', 'g')
|
|||
|
let content = substitute(content, '<br[^>]*>', "\n", 'g')
|
|||
|
let content = substitute(content, '<[^>]\+>', '', 'g')
|
|||
|
let content = join(filter(split(content, "\n"), 'len(v:val)>0'), "\n")
|
|||
|
call emmet#util#cache(url, content)
|
|||
|
endif
|
|||
|
|
|||
|
let content = substitute(content, "、\n", "、", "g")
|
|||
|
let clines = split(content, '\n')
|
|||
|
let lines = filter(clines, 'len(substitute(v:val,".",".","g"))<=wcount')
|
|||
|
if len(lines) == 0
|
|||
|
let lines = clines
|
|||
|
endif
|
|||
|
let r = emmet#util#rand()
|
|||
|
return lines[r % len(lines)]
|
|||
|
endfunction
|