--- a/Launcher.st Mon Jun 03 19:15:55 1996 +0200
+++ b/Launcher.st Mon Jun 03 19:18:57 1996 +0200
@@ -1600,7 +1600,7 @@
y := box yPosition.
topInsetComponent := box
- addLabelledInputField:(resources string:'top inset:')
+ addLabelledInputField:(resources string:'top margin:')
adjust:#right
on:topInset
tabable:true
@@ -1613,13 +1613,14 @@
unitList := SelectionInList with:#('inch' 'mm').
unitList selectionIndex:1.
- component := box addComponent:(PopUpList on:unitList).
- component left:0.6; width:0.3.
+ (box addComponent:(PopUpList on:unitList))
+ left:0.6;
+ width:0.3.
box yPosition:y1.
leftInsetComponent := box
- addLabelledInputField:(resources string:'left inset:')
+ addLabelledInputField:(resources string:'left margin:')
adjust:#right
on:leftInset
tabable:true
@@ -1628,7 +1629,7 @@
leftInsetComponent converter:(PrintConverter new initForNumber).
bottomInsetComponent := box
- addLabelledInputField:(resources string:'bottom inset:')
+ addLabelledInputField:(resources string:'bottom margin:')
adjust:#right
on:bottomInset
tabable:true
@@ -1722,7 +1723,7 @@
].
box destroy
- "Modified: 3.6.1996 / 18:59:10 / cg"
+ "Modified: 3.6.1996 / 19:17:06 / cg"
!
viewStyleSetting
@@ -2924,5 +2925,5 @@
!NewLauncher class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libtool/Launcher.st,v 1.143 1996-06-03 17:15:55 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libtool/Launcher.st,v 1.144 1996-06-03 17:18:57 cg Exp $'
! !