From: Vince D. <vi...@sa...> - 2005-08-30 14:19:09
|
On Tue, 30 Aug 2005, Joachim Kock wrote: > There is brief mention of the problem in diffMode.tcl That is _not_ a suitable place for a bug report! We'll never fix problems in Alpha(tk)/AlphaTcl if their only occurence is a brief mention in a file somewhere and a passing comment on this list... >: it's simple: we > need a list of split points where the file is chopped up in pieces. > [search -all] gives a bogus list cf. Bug 1915, so currently [regexp -all] > is used. Obviously the resulting string-indices do not work as positions > in AlphaTk. You can easily use [pos::math [minPos] + $indices] to make that sort of thing work with Alphatk: set indexlist {} foreach idx [regexp -all -inline -indices $splitPat $txt] { lappend indexlist [pos::math -w $win [minPos] + $idx] } But, as you say, that bug you cite should also be fixed. (But I haven't yet tested on Alphatk). cheers, Vince. |