diff --git a/Todo.txt b/Todo.txt
index 3ac7440..cdedbd2 100644
--- a/Todo.txt
+++ b/Todo.txt
@@ -2,7 +2,7 @@
 (A) 2011-06-06 Check file syntax @syntax
 (B) 2011-05-31 Start documentation @doc
 (C) 2011-06-01 Improve syntax file @syntax
-2011-05-30 Contact main project for reference
+x 2014-04-27 2011-05-30 Contact main project for reference
 X 2011-05-30 Create README.markdown to be published in github @doc
 X 2011-05-30 Implement colorized priorities @syntax
 X 2011-05-30 Implement filetype detection @ftdetect
diff --git a/ftplugin/todo.vim b/ftplugin/todo.vim
index 2cc7958..d3ec73a 100644
--- a/ftplugin/todo.vim
+++ b/ftplugin/todo.vim
@@ -18,18 +18,17 @@ setlocal wrapmargin=0
 
 " Functions {{{!
 function! s:TodoTxtRemovePriority()
-    normal! da)
-    :s/^\s\+//g
+    :s/^(\w)\s\+//ge
 endfunction
 
-function! s:TodoTxtPrependDate()
+function! TodoTxtPrependDate()
     normal! 0"=strftime("%Y-%m-%d ")
P
 endfunction
 
 function! TodoTxtMarkAsDone()
     call s:TodoTxtRemovePriority()
-    call s:TodoTxtPrependDate()
-    normal! Ix 
+    call TodoTxtPrependDate()
+    normal! Ix 
 endfunction
 
 " Mappings {{{1
@@ -39,16 +38,16 @@ if !hasmapto("<leader>s",'n')
 endif
 
 " Insert date {{{2
-if !hasmapto("<leader>d",'n')
-    nnoremap <script> <silent> <buffer> <leader>d 0"=strftime("%Y-%m-%d ")<CR>P
-endif
-
 if !hasmapto("date<Tab>",'i')
     inoremap <script> <silent> <buffer> date<Tab> <C-R>=strftime("%Y-%m-%d")<CR>
 endif
 
+if !hasmapto("<leader>d",'n')
+    nnoremap <script> <silent> <buffer> <leader>d :call TodoTxtPrependDate()<CR>
+endif
+
 if !hasmapto("<leader>d",'v')
-    vnoremap <script> <silent> <buffer> <leader>d c<C-R>=strftime("%Y-%m-%d")<CR><Esc>
+    vnoremap <script> <silent> <buffer> <leader>d :call TodoTxtPrependDate()<CR>
 endif
 
 " Mark done {{{2