Tk Source Code

Wrong index returned by @x,y with elided lines at end of text


package require Tk
pack [text .t]
.t insert end "aaa\nbbb\nccc"
.t index 3.end    ;  # returns 3.3 (OK)
.t index 3.end+1c ;  # returns 4.0 (OK)
.t index end      ;  # returns 4.0 (OK)
.t index @0,300   ;  # returns 3.3 (OK)

.t tag configure hiddenLine -elide 1 
.t tag add hiddenLine 2.0 3.end+1c
.t tag remove hiddenLine 2.0 3.end
.t index @0,300   ;  # returns 4.0 (WRONG)
.t tag ranges hiddenLine

.t tag remove hiddenLine 2.0 3.end+1c
.t index @0,300;  # returns 3.3 (OK)
.t tag ranges hiddenLine


Problem was originally reported at:

https://groups.google.com/d/msg/comp.lang.tcl/hBIXFmZ-MpY/wXygfdVVLfUJ

Merged in branch text-elided and then to core-8-5-branch and trunk.

Bug fix proposed in branches  bug-c199ef90a6  and  text-elided

Testing welcome, thanks.