From: Antonio Ospite <ospite@studenti.unina.it>
Date: Thu, 26 Nov 2009 00:00:00 +0000 (+0000)
Subject: Version 0.1: Initial upload
X-Git-Tag: 0.1^0
X-Git-Url: https://git.ao2.it/vim/signature_block.vim.git/commitdiff_plain/b0edcfba697c16e6b64cc83d16b232d89adc12cb

Version 0.1: Initial upload
---

b0edcfba697c16e6b64cc83d16b232d89adc12cb
diff --git a/README b/README
new file mode 100644
index 0000000..9083289
--- /dev/null
+++ b/README
@@ -0,0 +1,7 @@
+This is a mirror of http://www.vim.org/scripts/script.php?script_id=2872
+
+signature_block.vim is a simple plugin for adding and manipulating signature blocks in e-mails.
+
+It provides handy functions that can be called from maps or autocommands.
+
+There are other scripts offering similar functionality, see vimscript #45 or vimscript #10 or vimscript #509 but signature_block.vim is easier to understand and it can be easily extended.
diff --git a/plugin/signature_block.vim b/plugin/signature_block.vim
new file mode 100644
index 0000000..3811405
--- /dev/null
+++ b/plugin/signature_block.vim
@@ -0,0 +1,110 @@
+"---------------------------------------------------------------------------
+" Vim global plugin for adding and manipulating signature blocks in e-mails
+" Maintainer:  Antonio Ospite <ospite@studenti.unina.it>
+" Version:     0.1
+" Last Change: 2009-11-24
+" License:     This script is free software; you can redistribute it and/or
+"              modify it under the terms of the GNU General Public License.
+
+" Install Details:
+" Drop this file into your $HOME/.vim/plugin directory.
+"
+" Examples:
+" map <Leader>s :call AppendSignature('~/.signature')<CR>
+" map <Leader>r :call ReplaceLastSignature('~/.signature')<CR>
+" map <Leader>R :call ReplaceAllSignatures('~/.signature')<CR>
+"
+" " Append a signature block to all e-mails
+" autocmd FileType mail silent call AddSignature('~/.signature') | w
+"
+" " Append a signature block to cover letters generated with git-format-patch
+" autocmd BufRead 0000-cover-letter.patch silent call AddSignature('~/.signature') | w
+" autocmd BufRead 0000-cover-letter.patch autocmd! BufRead 0000-cover-letter.patch
+"
+" References:
+" http://en.wikipedia.org/wiki/Signature_block
+" http://tools.ietf.org/html/rfc1855
+"
+"---------------------------------------------------------------------------
+
+if exists("g:loaded_signaturePlugin") | finish | endif
+let g:loaded_signaturePlugin = 1
+
+
+"---------------------------------------------------------------------------
+" Function:     AppendSignature()
+" Purpose:      Append a signature block at the end of message
+"---------------------------------------------------------------------------
+func! AppendSignature(sigfile)
+	" Add the signature marker at the end of the file
+	exe '$put =\"-- \"'
+
+	" Append the signature block file at the end of the file
+	exe '$r ' . fnameescape(a:sigfile)
+endfunc
+
+
+"---------------------------------------------------------------------------
+" Function:     AddSignature()
+" Purpose:      Add a signature block if there isn't one already
+"---------------------------------------------------------------------------
+func! AddSignature(sigfile)
+	" Save current cursor position in mark 'z'
+	normal mz
+
+	" Append a signature block only if there isn't one already
+	try
+		exe '0/^-- $/'
+	catch /^Vim\%((\a\+)\)\=:E486/	" catch error E486 (search command failed)
+		" put an extra newline
+		exe '$put =\"\n\"'
+		call AppendSignature(a:sigfile)
+	endtry
+
+	" restore cursor position from mark 'z' if the mark is still valid
+	silent! normal `z
+endfunc
+
+
+"---------------------------------------------------------------------------
+" Function:     ReplaceAllSignatures()
+" Purpose:      Replace all signature blocks in the message
+"---------------------------------------------------------------------------
+func! ReplaceAllSignatures(sigfile)
+	" Save current cursor position in mark 'z'
+	normal mz
+
+	try
+		" delete from the FIRST signature marker '^-- $' down to
+		" the end of the file
+		exe '0/^-- $/,$d'
+	catch /^Vim\%((\a\+)\)\=:E486/	" catch error E486 (search command failed)
+	endtry
+
+	call AppendSignature(a:sigfile)
+	
+	" restore cursor position from mark 'z' if the mark is still valid
+	silent! normal `z
+endfunc
+
+
+"---------------------------------------------------------------------------
+" Function:     ReplaceLastSignature()
+" Purpose:      Replace only the last signature block in the message
+"---------------------------------------------------------------------------
+func! ReplaceLastSignature(sigfile)
+	" Save current cursor position in mark 'z'
+	normal mz
+
+	try
+		" delete from the LAST signature marker '^-- $' down to
+		" the end of the file
+		exe '$?^-- $?,$d'
+	catch /^Vim\%((\a\+)\)\=:E486/	" catch error E486 (search command failed)
+	endtry
+
+	call AppendSignature(a:sigfile)
+	
+	" restore cursor position from mark 'z' if the mark is still valid
+	silent! normal `z
+endfunc