My stuff

.stuff/.vim/plugin/jdocConvert.vim

@@ -0,0 +1,90 @@
+" Vim global plugin for javadoc comment wrangling
+" Maintainer:	fm@amplex.dk
+
+if exists("g:loaded_jdocConvert")
+  " finish
+endif
+let g:loaded_jdocConvert = 1
+
+let s:save_cpo = &cpo
+set cpo&vim
+ 
+let &cpo = s:save_cpo
+
+if !hasmapto('<Plug>jdocConvertCompact')
+  map <unique> <Leader>jc <Plug>jdocConvertCompact
+endif
+noremap <unique> <script> <Plug>jdocConvertCompact  <SID>ConvertCompact
+if !hasmapto('<Plug>jdocConvertHere')
+  map <unique> <Leader>jh <Plug>jdocConvertHere
+endif
+noremap <unique> <script> <Plug>jdocConvertHere  <SID>ConvertHere
+
+function! s:JdocConvert(type, rng1, rng2) range
+    let [rng1, rng2] = [a:rng1, a:rng2]
+    if rng2 < rng1
+        let [rng2,rng1] = [rng1,rng2]
+    end
+    let rng2 = max([rng1 + 3, rng2])
+    let inp = getline(rng1, rng2)
+    let out = []
+    let txt = []
+    let inside = -1
+    let did_subst = 0
+    let lead = ""
+    let lno = rng2 - rng1
+    for line in inp
+        if line =~ '^\s*/\*\*'
+            " Start jdoc
+            let inside = 1
+            let lead = substitute(line, '/\*\*.*$', "", "")
+        elseif line =~ '^\s*\* ' && inside > 0
+            " Inline jdoc
+            call add(txt, substitute(line, '^\s*\* ', "", ""))
+        elseif line =~ '^\s*\*/'
+            " End jdoc
+            let inside = 0
+            if a:type == 1
+                for l in txt 
+                    call add(out, lead.'/// '.l)
+                endfor
+                let txt = []
+                let did_subst = 1
+            end
+        elseif len(txt) > 0 && a:type == 2
+            " Place text on first
+            call add(out, line.' ///< '.txt[0])
+            call remove(txt, 0)
+            let did_subst = 1
+            if len(txt) > 0
+                let lead = repeat(" ", len(line)).' ///< '
+                for l in txt 
+                    call add(out, lead.l)
+                endfor
+            endif
+            let txt = []
+        else
+            " Copy over
+            call add(out, line)
+        endif
+        let lno += 1
+    endfor
+    if did_subst
+        exe rng1.",".rng2 " delete"
+        call append(rng1 - 1, out)
+        exe rng1 - 1 + len(out) 
+    endif
+endfunction
+
+function! s:CallConvert(bang, l1, l2)
+    let type = a:bang == "!" ? 1 : 2
+    call s:JdocConvert(type, a:l1, a:l2)
+endfunction
+ 
+nnoremap <SID>ConvertCompact  :call <SID>JdocConvert(1, line("."), line(".") + v:count1 - 1)<CR>
+nnoremap <SID>ConvertHere     :call <SID>JdocConvert(2, line("."), line(".") + v:count1 - 1)<CR>
+vnoremap <SID>ConvertCompact  :call <SID>JdocConvert(1, line("'<"), line("'>"))<CR>
+vnoremap <SID>ConvertHere     :call <SID>JdocConvert(2, line("'<"), line("'>"))<CR>
+command! -bang -range JdocConvert :call s:CallConvert("<bang>", <line1>, <line2>)
+
+let &cpo = s:save_cpo