Workspace.st
changeset 6597 b63c0114077e
parent 6583 af87db4a9809
child 6616 c0a78fe7ba09
equal deleted inserted replaced
6596:38f70b9dbdd9 6597:b63c0114077e
  2522     ].
  2522     ].
  2523 
  2523 
  2524     "Created: / 28-05-2019 / 11:05:45 / Claus Gittinger"
  2524     "Created: / 28-05-2019 / 11:05:45 / Claus Gittinger"
  2525 !
  2525 !
  2526 
  2526 
       
  2527 showLineLimitInMenu
       
  2528     ^ true "/ false.
       
  2529 
       
  2530     "Modified: / 06-06-2019 / 11:19:11 / Claus Gittinger"
       
  2531 !
       
  2532 
  2527 spyOnIt
  2533 spyOnIt
  2528     "user selected 'spyOnIt' from menu; show a wait-cursor, evaluate the code
  2534     "user selected 'spyOnIt' from menu; show a wait-cursor, evaluate the code
  2529      and finally restore the cursor. Show profile data on the Transcript"
  2535      and finally restore the cursor. Show profile data on the Transcript"
  2530 
  2536 
  2531     self spyOnItUsing:MessageTally
  2537     self spyOnItUsing:MessageTally
  2698      (for error feedback)"
  2704      (for error feedback)"
  2699 
  2705 
  2700     ^ true
  2706     ^ true
  2701 
  2707 
  2702     "Modified (comment): / 07-03-2012 / 17:52:59 / cg"
  2708     "Modified (comment): / 07-03-2012 / 17:52:59 / cg"
  2703 !
       
  2704 
       
  2705 showLineLimitInMenu
       
  2706     ^ false.
       
  2707 ! !
  2709 ! !
  2708 
  2710 
  2709 !Workspace class methodsFor:'documentation'!
  2711 !Workspace class methodsFor:'documentation'!
  2710 
  2712 
  2711 version
  2713 version