m-vim_plugins/todo.txt-vim
1
0
Fork 0
mirror of https://github.com/freitass/todo.txt-vim.git synced 2025-11-16 13:53:47 -05:00
Code Issues Actions Packages Projects Releases Wiki Activity

Just figured out that the built-in :sort command does the job

Browse Source
This commit is contained in:
Leandro Freitas
2011-06-04 20:25:15 -03:00
parent ced5314f5a
commit dcf4e882e0
2 changed files with 8 additions and 71 deletions
Download Patch File Download Diff File Expand all files Collapse all files

8
Todo.txt
View File

@@ -1,12 +1,12 @@
(A) 2011-05-30 Sort lines per priority @ftplugin
(A) 2011-06-03 Accept variable space length between fields @syntax
(B) 2011-05-31 Start documentation @doc
(C) 2011-05-30 Create README.markdown to be published in github @doc
(C) 2011-06-01 Improve syntax file @syntax
2011-05-30 Map commands to add, rm, ls, pri, depri etc @ftplugin
2011-05-30 Contact main project for reference
X 2011-05-31 Stop breaking lines automatically @ftplugin
X 2011-05-30 Implement filetype detection @ftdetect
2011-05-30 Map commands to add, rm, ls, pri, depri etc @ftplugin
X 2011-05-30 Implement colorized priorities @syntax
X 2011-05-30 Implement filetype detection @ftdetect
X 2011-05-30 Sort lines per priority @ftplugin
X 2011-05-31 Highlight date, project and context of tasks with no priority @syntax
X 2011-05-31 Stop breaking lines automatically @ftplugin
X 2011-05-31 Stop breaking lines automatically @ftplugin

71
ftplugin/todo.vim
View File

@@ -5,11 +5,10 @@
" Website: http://github.com/freitass/todo.txt.vim
" Version: 0.2
" TODO uncomment
"if exists("g:loaded_todo")
" finish
"endif
"let g:loaded_todo = 1
if exists("g:loaded_todo")
finish
endif
let g:loaded_todo = 1
let s:save_cpo = &cpo
set cpo&vim
@@ -17,66 +16,4 @@ set cpo&vim
setlocal textwidth=0
setlocal wrapmargin=0
if !hasmapto('<Plug>TodoSortlines')
map <unique> <leader>s <Plug>TodoSortlines
endif
"TODO replace
"noremap <unique> <script> <Plug>TodoSortlines <SID>SortLines
noremap <script> <Plug>TodoSortlines <SID>SortLines
noremap <SID>SortLines :call <SID>SortLines()<CR>
function! s:Compare(line1,line2)
" Matches a line starting with 'X '.
let done_pattern = '\m^X\s\+.*'
" Matches a line starting with '(\a) ' where \a is a letter.
let priority_pattern = '\m^(\a)\s\+.*'
" Matches date YYYY-MM-DD
let date_pattern = '\m\d\{4\}-\d\{2\}-\d\{2\}'
" Check PRIORITY first.
let done_1 = match(a:line1,done_pattern)
let done_2 = match(a:line2,done_pattern)
if done_1 != done_2
" Swap if only the first has been done.
return -done_2
endif
let pri_set_1 = match(a:line1,priority_pattern)
let pri_set_2 = match(a:line2,priority_pattern)
if pri_set_1 != pri_set_2
" Swap if only the second has priority set.
return -pri_set_1
elseif pri_set_1 >= 0
" Swap if the second has higher proprity.
return a:line2[1] <? a:line1[1]
endif
" If the execution reached this code, both tasks have the same priority.
" Go for the date, sorting older tasks first.
let x1 = match(a:line1,date_pattern)
let x2 = match(a:line2,date_pattern)
if x1 != x2
" Swap if only the second has creation date.
return -x1
endif
if x2 == -1
" If none has date, keep the order.
return 0
endif
" Calculate which date should come first
let date_1 = a:line1[(x1):(x1+9)]
let date_1 = substitute(date_1,"-","","g")
let date_2 = a:line2[(x2):(x2+9)]
let date_2 = substitute(date_2,"-","","g")
return date_1 > date_2
endfunction
function! s:SortLines()
let list_of_lines = getline(0,'$')
let sorted_list = sort(copy(list_of_lines),'s:Compare')
"%delete
for line in sorted_list
echo line
endfor
endfunction
let &cpo = s:save_cpo