--- a/TerminalView.st	Thu Apr 27 18:01:25 2017 +0200
+++ b/TerminalView.st	Mon May 01 10:28:47 2017 +0200
@@ -2037,6 +2037,19 @@
     self sendTerminateSignal
 !
 
+doSetLineLimit
+    "ask for the lineLimit (the number of buffered lines)"
+
+    |lineString n|
+    
+    lineString := Dialog request:'Number of buffered lines:' initialAnswer:(self lineLimit asString).
+    lineString isEmptyOrNil ifTrue:[^ self].
+    n := Integer readFrom:lineString onError:[^ self].
+    self lineLimit:(n max:100).
+
+    "Created: / 01-05-2017 / 10:27:51 / cg"
+!
+
 editMenu
     "return the view's middleButtonMenu"
 
@@ -2046,12 +2059,14 @@
     |items subMenu moreMenu m sensor|
 
     items := #(
-                    ('Interrupt'      doSendInterrupt )  
-                    ('Terminate'      doSendTerminateSignal )  
-                    ('Kill'           doSendKillSignal)  
-                    ('-'                              )
-                    ('Clear'          doClear         )  
-                    ('Reset'          doReset         )  
+                    ('Interrupt'          doSendInterrupt )  
+                    ('Terminate'          doSendTerminateSignal )  
+                    ('Kill'               doSendKillSignal)  
+                    ('-'                                  )
+                    ('Clear'              doClear         )  
+                    ('Reset'              doReset         ) 
+                    ('-'                                  )
+                    ('Linebuffer Size...' doSetLineLimit  )  
               ).
     subMenu := PopUpMenu itemList:items resources:resources.
 
@@ -2103,7 +2118,7 @@
     ].
     ^ m.
 
-    "Modified: / 03-04-2007 / 08:58:26 / cg"
+    "Modified: / 01-05-2017 / 10:28:30 / cg"
 !
 
 openFileBrowserOnIt