nextLine

$line nextLine args: returns following line in chain, invokes method if given

obj method line nextLine args {
  foreach line [$self lastDot lines] {
    if {$line eq $self} continue
    if {[$line group] ne [my group]} continue
    return [$line {*}$args]
  }
}