--- a/TextView.st Tue Oct 02 19:43:11 2001 +0200
+++ b/TextView.st Tue Oct 02 19:53:58 2001 +0200
@@ -1439,21 +1439,21 @@
|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 )
+ ('Font...' changeFont )
+ ('-' nil )
+ ('Search...' search Find)
+ ('Goto...' gotoLine GotoLine)
+ ('-' nil )
+ ('Save As...' save SaveAs)
+ ('Print' doPrint Print)
+ ).
m := PopUpMenu itemList:items resources:resources.
self hasSelectionForCopy ifFalse:[
- m disable:#copySelection.
+ m disable:#copySelection.
].
^ m
@@ -3224,5 +3224,5 @@
!TextView class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libwidg/TextView.st,v 1.169 2001-10-02 17:43:11 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libwidg/TextView.st,v 1.170 2001-10-02 17:53:58 cg Exp $'
! !