" vimrc (useful settings for oberon coding)
" Daniel Hottinger <hodaniel@student.ethz.ch>
" Licence: GNU GPL
"
set autoindent
set shiftwidth=2
set smarttab
set showmatch
set nocompatible
set scrolloff=3

fun! LastMod(keyword)
  if line("$") > 30
    let l = 30
  else
    let l = line("$")
  endif
  exe "1," . l . "g/Last " . a:keyword . ": /s/Last " . a:keyword . ": .*/Last " . 
  \ a:keyword . ": " . strftime("%a %b %d %T %Z %Y")
endfun

au BufWritePre,FileWritePre *.mod  ky|call LastMod("modified")|'y
au BufNewFile,BufRead       *.mod  set ft=oberon

syntax on