Add: prioritize update the priority

When there is already a priority in the line, we update it instead of adding
a new one

ftplugin/todo.vim

@@ -111,8 +111,12 @@ function! TodoTxtPrioritizeDecrease()
     normal! 0f)h
 endfunction
 
-function! TodoTxtPrioritizeAdd (priority)
+function! TodoTxtPrioritizeAdd (priority)
+    let line=getline('.')
     if line !~ '^([A-F])'
+        :call TodoTxtPrioritizeAddAction(a:priority)
+    else
+        exec ':s/^([A-F])/('.a:priority.')/'
     endif
 endfunction