[Tcl-bugs] [Tk] (bll) tkt (Open): text widget: tag -tabs does not work properly. (textDisp-2.26)

Previous Topic Next Topic
 
classic Classic list List threaded Threaded
1 message Options
Reply | Threaded
Open this post in threaded view
|

[Tcl-bugs] [Tk] (bll) tkt (Open): text widget: tag -tabs does not work properly. (textDisp-2.26)

akupries
Automated mail by fx, on behalf of [hidden email]

Ticket Change [58c57be8d36562de7696871547164573a6b061e0]
  [text widget: tag -tabs does not work properly. (textDisp-2.26)]
  By      bll
  For     Tk
  On      2017-07-04T15:57:30.420
  Details https://core.tcl.tk/tk/tinfo?name=58c57be8d36562de7696871547164573a6b061e0
  Ticket  https://core.tcl.tk/tk/tktview/a34b49f8c63aeb7736f48eba24b256158aaff022

Changed Fields
  icomment:   Works on Mac OS X.

              Right justified does not work on Linux.  I still get the arrow symbols
              as in the picture.  This bug is present in both 8.6.6 and
              revised_text.

              I did remember to pull, update, make.

              Updated test script.

              package require Tk  text .z -height 5  set f "{Courier New} -12"  .z
              configure -font $f  pack .z

              set tsize [expr {[font measure $f m]*4}]

              .z insert end "a\ b\ c\ d\ e"  .z insert end "\ "  .z insert end
              1234567890123456789012345678901234567890  .z insert end "\ "  .z
              insert end "a\ b\ c\ d\ e"  .z tag configure x -tabs $tsize -justify
              right  .z tag add x 1.0 end  set ::x 0  after 5000 [list set ::x 1]
              vwait ::x  .z tag remove x 1.0 end  .z tag configure y -tabs $tsize
              -justify left  .z tag add y 1.0 end  set ::x 0  after 5000 [list set
              ::x 1]  vwait ::x  .z tag remove y 1.0 end
  login:      bll
  resolution: None

------------------------------------------------------------
See Tcl/Tk development @ http://core.tcl.tk/
------------------------------------------------------------

------------------------------------------------------------------------------
Check out the vibrant tech community on one of the world's most
engaging tech sites, Slashdot.org! http://sdm.link/slashdot
_______________________________________________
Tcl-Bugs mailing list
[hidden email]
https://lists.sourceforge.net/lists/listinfo/tcl-bugs