|
|
@ -1,8 +1,27 @@ |
|
|
|
if $TITFICHE_MODE |
|
|
|
if exists("$TITFICHE_HOME") && expand('%:p') =~ $TITFICHE_HOME |
|
|
|
function! NewTitfiche() |
|
|
|
let dir = strftime("%Y/%m/%d") |
|
|
|
call mkdir(dir, 'p') |
|
|
|
let zId = dir . '/' . strftime("%H:%M") |
|
|
|
edit `=zId . ".md"` |
|
|
|
call append(0, "# /" . zId . " ") |
|
|
|
normal 1G$ |
|
|
|
startinsert! |
|
|
|
endfunction |
|
|
|
|
|
|
|
function! MkLink(p) |
|
|
|
call mkdir(fnamemodify(a:p, ':h'), 'p') |
|
|
|
call system('ln ' . expand('%:S') . ' ' . fnamemodify(a:p, ':S')) |
|
|
|
endfunction |
|
|
|
|
|
|
|
command! -nargs=1 -complete=file_in_path Tag call MkLink(<f-args>) |
|
|
|
|
|
|
|
set isfname+=: |
|
|
|
set includeexpr=substitute(v:fname,'/','','') |
|
|
|
cd $TITFICHE_HOME |
|
|
|
nnoremap <C-l> "zciw(/<C-r>#)<Esc>%i[<C-r>z]<Esc>% |
|
|
|
vnoremap <C-l> "zc(/<C-r>#)<Esc>%i[<C-r>z]<Esc>% |
|
|
|
inoremap <C-l> (/<C-r>#)<Esc>%i[]<Left> |
|
|
|
nnoremap <C-n> :call NewTitfiche()<CR> |
|
|
|
nnoremap <C-t> :Tag<Space> |
|
|
|
endif |