TextView.st
changeset 2458 4a61ac0ba64c
parent 2455 750760093931
child 2488 3e1ee2bbab6b
--- a/TextView.st	Fri Nov 09 18:50:16 2001 +0100
+++ b/TextView.st	Mon Nov 12 13:47:27 2001 +0100
@@ -1439,25 +1439,25 @@
     |items m|
 
     items := #(
-			('Copy'        copySelection  Copy)
-			('-'           nil            )
-			('Font...'     changeFont     )
-			('-'           nil            )
-			('Search...'   search         Find)
-			('Goto...'     gotoLine       GotoLine)
-			('-'           nil            )
-			('Save As...'  save           SaveAs)
-			('Print'       doPrint        Print)
-		).
+                        ('Copy'        copySelection  Copy)
+                        ('-'           nil            )
+                        ('Search...'   search         Find)
+                        ('Goto...'     gotoLine       GotoLine)
+                        ('-'           nil            )
+                        ('Font...'     changeFont     )
+                        ('-'           nil            )
+                        ('Save As...'  save           SaveAs)
+                        ('Print'       doPrint        Print)
+                ).
 
     m := PopUpMenu itemList:items resources:resources.
 
     self hasSelectionForCopy ifFalse:[
-	m disable:#copySelection.
+        m disable:#copySelection.
     ].
     ^ m
 
-    "Modified: / 21.5.1998 / 15:44:37 / cg"
+    "Modified: / 12.11.2001 / 13:43:56 / cg"
 !
 
 find
@@ -3232,5 +3232,5 @@
 !TextView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg/TextView.st,v 1.174 2001-11-09 13:28:17 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg/TextView.st,v 1.175 2001-11-12 12:47:27 cg Exp $'
 ! !