TextView.st
changeset 1487 4a9bfda28991
parent 1477 2d4b6115e2c5
child 1496 95a24d9211df
equal deleted inserted replaced
1486:937a425595ef 1487:4a9bfda28991
   517      without redraw.
   517      without redraw.
   518      Redefined since changing contents implies deselect"
   518      Redefined since changing contents implies deselect"
   519 
   519 
   520     self unselect.
   520     self unselect.
   521     super setList:something
   521     super setList:something
       
   522 !
       
   523 
       
   524 text
       
   525     "for ST80 compatibility"
       
   526 
       
   527     ^ self contents
       
   528 
       
   529     "Created: / 19.4.1998 / 12:53:10 / cg"
   522 !
   530 !
   523 
   531 
   524 wordAtLine:selectLine col:selectCol do:aFiveArgBlock
   532 wordAtLine:selectLine col:selectCol do:aFiveArgBlock
   525     "find word boundaries, evaluate the block argument with those.
   533     "find word boundaries, evaluate the block argument with those.
   526      A helper for nextWord and selectWord functions."
   534      A helper for nextWord and selectWord functions."
  2847 ! !
  2855 ! !
  2848 
  2856 
  2849 !TextView class methodsFor:'documentation'!
  2857 !TextView class methodsFor:'documentation'!
  2850 
  2858 
  2851 version
  2859 version
  2852     ^ '$Header: /cvs/stx/stx/libwidg/TextView.st,v 1.115 1998-04-03 14:54:44 tz Exp $'
  2860     ^ '$Header: /cvs/stx/stx/libwidg/TextView.st,v 1.116 1998-04-19 15:10:08 cg Exp $'
  2853 ! !
  2861 ! !