This is it all
Code:
On *:dialog:logviewer:sclick:*:{ 
  if ($did == 3) {  
    set %ldir $sdir($mircdir,Choose a log Dir)
    did -ra logviewer 2 %ldir 
    haltdef $findfile(%ldir,*.log,0,aline @logviewer $1-)
    haltdef $findfile(%ldir,*.log,0,did -a logviewer 4 $nopath($1-))
  }
  if ($did == 4) { 
    window @log2
    did -r logviewer 1
    loadbuf -r @log2 $line(@logviewer,$did(logviewer,4).sel)
    if ($line(@logviewer,N) != 0) {
      var %llst 1
      while (%llst <= $line(@log2,N)) {
        did -a logviewer 1 $strip($line(@log2,%llst))  
        inc %llst
      }
    }
  }
}