function DlgChangeLogHeader()
let s:line=line(".")
call setline(s:line, .strftime("%Y-%m-%d") "Sasa Ostrouska <saxa@droplinegnome.org>")
call append(s:line,"")
call append(s:line+1,"          Released revision -x86_64-dl.  (Dropline GNOME 2.16.2)")
call append(s:line+2,"")
call append(s:line+3,"          * build: built on Slamd64-11.0 platform.")
unlet s:line
endfunction

imap <F4>  ^[mz:execute DlgChangeLogHeader()^M`zjA