home *** CD-ROM | disk | FTP | other *** search
- on mouseUp
- global theArticle, theArticleList
- set ml to the mouseLine
- if ml <> -1 then
- if ml <> the number of lines in theArticleList then
- hilite line ml of field "recentHead"
- startTimer()
- repeat while the timer < 30
- end repeat
- set theArticle to line ml of theArticleList
- go(1)
- end if
- end if
- end
-