New file, originally from Aapo Rantalainen,
but heavily edited, extended, and improved.


git-svn-id: svn://svn.savannah.gnu.org/nano/trunk/nano@4901 35c25a1d-7b9e-4130-9fde-d3aeb78583b8