#REFACTORING by cg
class: EditTextView
added: #showLineLimitInMenu
changed: #editMenu
--- a/EditTextView.st Thu Jun 06 11:26:22 2019 +0200
+++ b/EditTextView.st Thu Jun 06 11:26:38 2019 +0200
@@ -1,3 +1,5 @@
+"{ Encoding: utf8 }"
+
"
COPYRIGHT (c) 1989 by Claus Gittinger
All Rights Reserved
@@ -6803,13 +6805,20 @@
('Tools' tools )
('Font...' changeFont )
('Insert Unicode...' insertUnicode )
- ).
+ ).
CharacterSetView notNil ifTrue:[
items := items ,
#(
('Special Characters...' specialCharacters OpenSpecialCharacterWindow )
).
].
+ self showLineLimitInMenu ifTrue:[
+ items := items ,
+ #(
+ ('Set Line Limit...' doSetLineLimit )
+ ).
+ ].
+
items := items , #(
('-' )
('Save As...' save SaveAs )
@@ -7058,7 +7067,7 @@
^ m.
"Modified: / 30-11-2017 / 15:06:03 / cg"
- "Modified: / 28-05-2019 / 10:32:17 / Claus Gittinger"
+ "Modified: / 06-06-2019 / 11:22:31 / Claus Gittinger"
!
getTextSelectionFromHistory
@@ -7818,6 +7827,14 @@
v topView label:'deleted text'.
!
+showLineLimitInMenu
+ "only for text collectors"
+
+ ^ false.
+
+ "Created: / 06-06-2019 / 11:22:09 / Claus Gittinger"
+!
+
sort:how ignoreCase:ignoreCase fromLine:start toLine:end
"sort/reorder the selected lines.
how: