vim: generalize compose buffer function further

[notmuch] / vim / plugin / notmuch.vim

diff --git a/vim/plugin/notmuch.vim b/vim/plugin/notmuch.vim
index 4e164b8d3b0357ede14174664aa3c720cd7309c3..ef3260ed085473a0943f9820f86f0994d993a45c 100644 (file)
--- a/vim/plugin/notmuch.vim
+++ b/vim/plugin/notmuch.vim
@@ -856,13 +856,7 @@ endfunction
 " --- implement compose screen {{{1
 
 function! s:NM_cmd_compose(words, body_lines)
 " --- implement compose screen {{{1
 
 function! s:NM_cmd_compose(words, body_lines)

-        let lines = !g:notmuch_compose_header_help ? [] : [
-                  \ 'Notmuch-Help: Type in your message here; to help you use these bindings:',
-                  \ 'Notmuch-Help:   ,a    - attach a file',
-                  \ 'Notmuch-Help:   ,s    - send the message (Notmuch-Help lines will be removed)',
-                  \ 'Notmuch-Help:   ,q    - abort the message',
-                  \ 'Notmuch-Help:   <Tab> - skip through header lines',
-                  \ ]
+        let lines = []

         let start_on_line = 0
 
         let hdrs = { }
         let start_on_line = 0
 
         let hdrs = { }


@@ -900,7 +894,7 @@ function! s:NM_cmd_compose(words, body_lines)
                 endif
         endfor
 
                 endif
         endfor
 

-        call extend(lines, [ '', '' ])
+        call add(lines, '')

         if !start_on_line
                 let start_on_line = len(lines) + 1
         endif
         if !start_on_line
                 let start_on_line = len(lines) + 1
         endif


@@ -908,25 +902,10 @@ function! s:NM_cmd_compose(words, body_lines)
         if len(a:body_lines)
                 call extend(lines, a:body_lines)
         else
         if len(a:body_lines)
                 call extend(lines, a:body_lines)
         else

-                call add(lines, '')
+                call extend(lines, [ '', '' ])

         endif
         endif

-        call extend(lines, g:notmuch_signature)
-
-        let prev_bufnr = bufnr('%')
-        setlocal bufhidden=hide
-        call <SID>NM_newFileBuffer(g:notmuch_compose_temp_file_dir, '%s.mail',
-                                  \ 'compose', lines)
-        setlocal bufhidden=hide
-        let b:nm_prev_bufnr = prev_bufnr
-
-        call <SID>NM_set_map('n', g:notmuch_compose_nmaps)
-        call <SID>NM_set_map('i', g:notmuch_compose_imaps)

 
 

-        call cursor(start_on_line, strlen(start_on_line) + 1)
-        if g:notmuch_compose_insert_mode_start
-                startinsert!
-        endif
-        echo 'Type your message, use <TAB> to jump to next header and then body.'
+        call <SID>NM_newComposeBuffer(lines, start_on_line)

 endfunction
 
 function! s:NM_compose_send()
 endfunction
 
 function! s:NM_compose_send()


@@ -1117,6 +1096,50 @@ function! s:NM_newFileBuffer(fdir, fname, type, lines)
         let b:nm_type = a:type
 endfunction
 
         let b:nm_type = a:type
 endfunction
 

+function! s:NM_newComposeBuffer(lines, start_on_line)
+        let lines = a:lines
+        let start_on_line = a:start_on_line
+        let real_hdr_start = 1
+        if g:notmuch_compose_header_help
+                let help_lines = [
+                  \ 'Notmuch-Help: Type in your message here; to help you use these bindings:',
+                  \ 'Notmuch-Help:   ,a    - attach a file',
+                  \ 'Notmuch-Help:   ,s    - send the message (Notmuch-Help lines will be removed)',
+                  \ 'Notmuch-Help:   ,q    - abort the message',
+                  \ 'Notmuch-Help:   <Tab> - skip through header lines',
+                  \ ]
+                call extend(lines, help_lines, 0)
+                let real_hdr_start = len(help_lines)
+                if start_on_line > 0
+                        let start_on_line = start_on_line + len(help_lines)
+                endif
+        endif
+        call extend(lines, g:notmuch_signature)
+
+
+        let prev_bufnr = bufnr('%')
+        setlocal bufhidden=hide
+        call <SID>NM_newFileBuffer(g:notmuch_compose_temp_file_dir, '%s.mail',
+                                  \ 'compose', lines)
+        setlocal bufhidden=hide
+        let b:nm_prev_bufnr = prev_bufnr
+
+        call <SID>NM_set_map('n', g:notmuch_compose_nmaps)
+        call <SID>NM_set_map('i', g:notmuch_compose_imaps)
+
+        if start_on_line > 0 && start_on_line <= len(lines)
+                call cursor(start_on_line, strlen(getline(start_on_line)) + 1)
+        else
+                call cursor(real_hdr_start, strlen(getline(real_hdr_start) + 1)
+                call <SID>NM_compose_next_entry_area()
+        endif
+
+        if g:notmuch_compose_insert_mode_start
+                startinsert!
+        endif
+        echo 'Type your message, use <TAB> to jump to next header and then body.'
+endfunction
+

 function! s:NM_assert_buffer_type(type)
         if !exists('b:nm_type') || b:nm_type != a:type
                 throw printf('Eeek! expected type %s, but got %s.', a:type,
 function! s:NM_assert_buffer_type(type)
         if !exists('b:nm_type') || b:nm_type != a:type
                 throw printf('Eeek! expected type %s, but got %s.', a:type,