Add vimorganizer
git-svn-id: http://photonzero.com/dotfiles/trunk@119 23f722f6-122a-0410-8cef-c75bd312dd78
This commit is contained in:
michener
parent
e85ab4a082
commit
523fde6acd
17 changed files with 12634 additions and 0 deletions
217
.vim/bundle/VimOrganizer/autoload/org.vim
Normal file
217
.vim/bundle/VimOrganizer/autoload/org.vim
Normal file
|
|
@ -0,0 +1,217 @@
|
|||
" org.vim - VimOrganizer plugin for Vim
|
||||
" -------------------------------------------------------------
|
||||
" Version: 0.30
|
||||
" Maintainer: Herbert Sitz <hesitz@gmail.com>
|
||||
" Last Change: 2011 Nov 02
|
||||
"
|
||||
" Script: http://www.vim.org/scripts/script.php?script_id=3342
|
||||
" Github page: http://github.com/hsitz/VimOrganizer
|
||||
" Copyright: (c) 2010, 2011 by Herbert Sitz
|
||||
" The VIM LICENSE applies to all files in the
|
||||
" VimOrganizer plugin.
|
||||
" (See the Vim copyright except read "VimOrganizer"
|
||||
" in places where that copyright refers to "Vim".)
|
||||
" http://vimdoc.sourceforge.net/htmldoc/uganda.html#license
|
||||
" No warranty, express or implied.
|
||||
" *** *** Use At-Your-Own-Risk *** ***
|
||||
|
||||
if exists("g:org_autoload_funcs")
|
||||
finish
|
||||
endif
|
||||
|
||||
let g:org_autoload_funcs=1
|
||||
|
||||
function! org#SetOrgFileType()
|
||||
"if expand("%:e") == 'org'
|
||||
if &filetype != 'org'
|
||||
execute "set filetype=org"
|
||||
|
||||
" if !exists('g:org_todo_setup')
|
||||
" let g:org_todo_setup = 'TODO | DONE'
|
||||
" endif
|
||||
" if !exists('g:org_tag_setup')
|
||||
" let g:org_tag_setup = '{home(h) work(w)}'
|
||||
" endif
|
||||
"
|
||||
" call OrgProcessConfigLines()
|
||||
" exec "syntax match DONETODO '" . b:v.todoDoneMatch . "' containedin=OL1,OL2,OL3,OL4,OL5,OL6"
|
||||
" exec "syntax match NOTDONETODO '" . b:v.todoNotDoneMatch . "' containedin=OL1,OL2,OL3,OL4,OL5,OL6"
|
||||
|
||||
endif
|
||||
"endif
|
||||
endfunction
|
||||
|
||||
function! org#Pad(s,amt)
|
||||
return a:s . repeat(' ',a:amt - len(a:s))
|
||||
endfunction
|
||||
|
||||
function! org#Timestamp()
|
||||
return strftime("%Y-%m-%d %a %H:%M")
|
||||
endfunction
|
||||
|
||||
function! org#redir(command)
|
||||
let save_a = @a
|
||||
try
|
||||
silent! redir @a
|
||||
silent! exe a:command
|
||||
redir END
|
||||
finally
|
||||
"let res = split(@a,"\n")
|
||||
let res = @a
|
||||
|
||||
" restore register
|
||||
let @a = save_a
|
||||
return res
|
||||
endtry
|
||||
endfunction
|
||||
|
||||
function! org#GetGroupHighlight(group)
|
||||
" this code was copied and modified from code posted on StackOverflow
|
||||
" http://stackoverflow.com/questions/1331213/how-to-modify-existing-highlight-group-in-vim
|
||||
" Redirect the output of the "hi" command into a variable
|
||||
" and find the highlighting
|
||||
redir => GroupDetails
|
||||
try
|
||||
exe "silent hi " . a:group
|
||||
catch
|
||||
" skip error message if no such group exists
|
||||
endtry
|
||||
redir END
|
||||
|
||||
" Resolve linked groups to find the root highlighting scheme
|
||||
while GroupDetails =~ "links to"
|
||||
let index = stridx(GroupDetails, "links to") + len("links to")
|
||||
let LinkedGroup = strpart(GroupDetails, index + 1)
|
||||
redir => GroupDetails
|
||||
exe "silent hi " . LinkedGroup
|
||||
redir END
|
||||
endwhile
|
||||
|
||||
if GroupDetails ># ''
|
||||
" Extract the highlighting details (the bit after "xxx")
|
||||
let MatchGroups = matchlist(GroupDetails, '\<xxx\>\s\+\(.*\)')
|
||||
let ExistingHighlight = MatchGroups[1] !~? 'cleared' ? MatchGroups[1] : ''
|
||||
else
|
||||
" Group does not exist
|
||||
let ExistingHighlight = ''
|
||||
endif
|
||||
|
||||
return ExistingHighlight
|
||||
|
||||
endfunction
|
||||
|
||||
function! org#ISODateToYWD(date)
|
||||
"returns y,w,d which are iso week spec for date
|
||||
let date = a:date
|
||||
"let d = 1 + ((calutil#dow(date) + 4) % 7)
|
||||
let d = 1 + calutil#dow(date)
|
||||
let jul_nThur = calutil#jul(date) + 4 - d
|
||||
let y = calutil#cal(jul_nThur)[0:3]
|
||||
let julJan1 = calutil#jul(date[0:3] . '-01-01')
|
||||
let w = 1 + ((jul_nThur - julJan1) / 7)
|
||||
return [y,w,d]
|
||||
endfunction
|
||||
|
||||
function! org#LocateFile(filename)
|
||||
let filename = a:filename
|
||||
|
||||
if bufwinnr(filename) >= 0
|
||||
silent execute bufwinnr(filename)."wincmd w"
|
||||
else
|
||||
if org#redir('tabs') =~ fnamemodify(filename, ':t')
|
||||
" proceed on assumption that file is open
|
||||
" if match found in tablist
|
||||
let this_tab = tabpagenr()
|
||||
let last_tab = tabpagenr('$')
|
||||
for i in range(1 , last_tab)
|
||||
exec i . 'tabn'
|
||||
if bufwinnr(filename) >= 0
|
||||
silent execute bufwinnr(filename)."wincmd w"
|
||||
break
|
||||
" if file not found then use tab drop to open new file
|
||||
elseif i == last_tab
|
||||
execute 'tab drop ' . filename
|
||||
if (&ft != 'org') && (filename != '__Agenda__')
|
||||
call org#SetOrgFileType()
|
||||
endif
|
||||
endif
|
||||
tabn
|
||||
endfor
|
||||
else
|
||||
exe 'tabn ' . tabpagenr('$')
|
||||
execute 'tab drop ' . filename
|
||||
if (&ft != 'org') && (filename != '__Agenda__')
|
||||
call org#SetOrgFileType()
|
||||
endif
|
||||
endif
|
||||
endif
|
||||
if (&fdm != 'expr') && !exists('g:in_agenda_search')
|
||||
set fdm=expr
|
||||
set foldlevel=1
|
||||
endif
|
||||
|
||||
endfunction
|
||||
|
||||
function! org#SaveLocation()
|
||||
let file_loc = bufname('%') ==? '__Agenda__' ? '__Agenda__' : expand('%:p')
|
||||
let g:location = [ file_loc , getpos('.') ]
|
||||
endfunction
|
||||
function! org#RestoreLocation()
|
||||
if expand('%:p') != g:location[0]
|
||||
call org#LocateFile( g:location[0] )
|
||||
endif
|
||||
call setpos( '.', g:location[1] )
|
||||
endfunction
|
||||
|
||||
|
||||
function! org#OpenCaptureFile()
|
||||
call org#LocateFile(g:org_capture_file)
|
||||
endfunction
|
||||
|
||||
function! org#CaptureBuffer()
|
||||
if !exists('g:org_capture_file') || empty(g:org_capture_file)
|
||||
echo 'Capture is not set up. Please read docs at :h vimorg-capture.'
|
||||
return
|
||||
endif
|
||||
if bufnr('_Org_Capture_') > 0
|
||||
exec 'bwipeout! ' . bufnr('_Org_Capture_')
|
||||
endif
|
||||
sp _Org_Capture_
|
||||
autocmd BufWriteCmd <buffer> :call <SID>ProcessCapture()
|
||||
"autocmd BufLeave <buffer> :bwipeout
|
||||
autocmd BufUnload <buffer> :set nomodified
|
||||
set nobuflisted
|
||||
set ft=org
|
||||
setlocal buftype=acwrite
|
||||
setlocal noswapfile
|
||||
command! -buffer W :call <SID>ProcessCapture()
|
||||
" below is the basic template
|
||||
" a first level head with date timestamp
|
||||
normal ggVGd
|
||||
normal i*
|
||||
silent exec "normal o:<".org#Timestamp().">"
|
||||
normal gg
|
||||
set nomodified
|
||||
startinsert!
|
||||
|
||||
endfunction
|
||||
function! s:ProcessCapture()
|
||||
"normal ggVG"xy
|
||||
let curbufnr = bufnr(g:org_capture_file)
|
||||
" check if capture file is already open or not
|
||||
if curbufnr == -1
|
||||
exe '1,$write >> ' . g:org_capture_file
|
||||
bw! _Org_Capture_
|
||||
else
|
||||
normal ggVG"xy
|
||||
bw! _Org_Capture_
|
||||
call org#SaveLocation()
|
||||
call org#LocateFile(g:org_capture_file)
|
||||
normal G"xp
|
||||
silent write
|
||||
call org#RestoreLocation()
|
||||
endif
|
||||
exe 'bwipeout! ' . g:org_capture_file
|
||||
|
||||
endfunction
|
||||
|
||||
Loading…
Add table
Add a link
Reference in a new issue