FilterWindow

alias -l validEntry {
  var %string = $1- , %i = 1
  while (%i <= $hget(spamfilter,0).item) {
    var %keyword = $+(/,$hget(spamfilter,%i).item,/i)
    if ($regex(%string,%keyword)) { addFiltered !addpre %string - %keyword | return }
    else inc %i
  }
  return 1
}

alias addFiltered {
  if (!$window(@Filtered)) { window -abk0eg2 @Filtered }
  var %output = $1-, %rlsname = $2
  var %tstamp = 02( $+ $time $+ 02)
  if ($fline(@Filtered,%rlsname,0,2)) return
  else aline -h @Filtered %tstamp %output
}