hg/stx-libwidg2: ParagraphSpecification.st@09ae5bbed69e (annotated)

36 160b8f0dfd7d * empty log message * claus parents: 29 diff changeset	1	"
160b8f0dfd7d * empty log message * claus parents: 29 diff changeset	2	COPYRIGHT (c) 1994 by Claus Gittinger
160b8f0dfd7d * empty log message * claus parents: 29 diff changeset	3	All Rights Reserved
160b8f0dfd7d * empty log message * claus parents: 29 diff changeset	4
160b8f0dfd7d * empty log message * claus parents: 29 diff changeset	5	This software is furnished under a license and may be used
160b8f0dfd7d * empty log message * claus parents: 29 diff changeset	6	only in accordance with the terms of that license and with the
160b8f0dfd7d * empty log message * claus parents: 29 diff changeset	7	inclusion of the above copyright notice. This software may not
160b8f0dfd7d * empty log message * claus parents: 29 diff changeset	8	be provided or otherwise made available to, or used by, any
160b8f0dfd7d * empty log message * claus parents: 29 diff changeset	9	other person. No title to or ownership of the software is
160b8f0dfd7d * empty log message * claus parents: 29 diff changeset	10	hereby transferred.
160b8f0dfd7d * empty log message * claus parents: 29 diff changeset	11	"
4770 6634b540fea2 Added PluggableHierarchicalList to define ad-hoc tree models. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3150 diff changeset	12	"{ Package: 'stx:libwidg2' }"
29 b1663ac8f532 Initial revision claus parents: diff changeset	13
4770 6634b540fea2 Added PluggableHierarchicalList to define ad-hoc tree models. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3150 diff changeset	14	"{ NameSpace: Smalltalk }"
3150 e3a55f15ef7e package information Claus Gittinger <cg@exept.de> parents: 1431 diff changeset	15
29 b1663ac8f532 Initial revision claus parents: diff changeset	16	TabulatorSpecification subclass:#ParagraphSpecification
1431 0cc20a8f2f7c docu & copyright Claus Gittinger <cg@exept.de> parents: 86 diff changeset	17	instanceVariableNames:'leftMargin rightMargin textAlignment'
0cc20a8f2f7c docu & copyright Claus Gittinger <cg@exept.de> parents: 86 diff changeset	18	classVariableNames:''
0cc20a8f2f7c docu & copyright Claus Gittinger <cg@exept.de> parents: 86 diff changeset	19	poolDictionaries:''
0cc20a8f2f7c docu & copyright Claus Gittinger <cg@exept.de> parents: 86 diff changeset	20	category:'Views-Support'
29 b1663ac8f532 Initial revision claus parents: diff changeset	21	!
b1663ac8f532 Initial revision claus parents: diff changeset	22
36 160b8f0dfd7d * empty log message * claus parents: 29 diff changeset	23	!ParagraphSpecification class methodsFor:'documentation'!
160b8f0dfd7d * empty log message * claus parents: 29 diff changeset	24
160b8f0dfd7d * empty log message * claus parents: 29 diff changeset	25	copyright
160b8f0dfd7d * empty log message * claus parents: 29 diff changeset	26	"
160b8f0dfd7d * empty log message * claus parents: 29 diff changeset	27	COPYRIGHT (c) 1994 by Claus Gittinger
160b8f0dfd7d * empty log message * claus parents: 29 diff changeset	28	All Rights Reserved
160b8f0dfd7d * empty log message * claus parents: 29 diff changeset	29
160b8f0dfd7d * empty log message * claus parents: 29 diff changeset	30	This software is furnished under a license and may be used
160b8f0dfd7d * empty log message * claus parents: 29 diff changeset	31	only in accordance with the terms of that license and with the
160b8f0dfd7d * empty log message * claus parents: 29 diff changeset	32	inclusion of the above copyright notice. This software may not
160b8f0dfd7d * empty log message * claus parents: 29 diff changeset	33	be provided or otherwise made available to, or used by, any
160b8f0dfd7d * empty log message * claus parents: 29 diff changeset	34	other person. No title to or ownership of the software is
160b8f0dfd7d * empty log message * claus parents: 29 diff changeset	35	hereby transferred.
160b8f0dfd7d * empty log message * claus parents: 29 diff changeset	36	"
160b8f0dfd7d * empty log message * claus parents: 29 diff changeset	37	!
160b8f0dfd7d * empty log message * claus parents: 29 diff changeset	38
160b8f0dfd7d * empty log message * claus parents: 29 diff changeset	39	documentation
160b8f0dfd7d * empty log message * claus parents: 29 diff changeset	40	"
160b8f0dfd7d * empty log message * claus parents: 29 diff changeset	41	Instances of this class can be used to represent the tabs
160b8f0dfd7d * empty log message * claus parents: 29 diff changeset	42	and margins of a paragraph of text. Its a goody, not really
160b8f0dfd7d * empty log message * claus parents: 29 diff changeset	43	used currently.
160b8f0dfd7d * empty log message * claus parents: 29 diff changeset	44	"
160b8f0dfd7d * empty log message * claus parents: 29 diff changeset	45	! !
160b8f0dfd7d * empty log message * claus parents: 29 diff changeset	46
29 b1663ac8f532 Initial revision claus parents: diff changeset	47	!ParagraphSpecification methodsFor:'accessing'!
b1663ac8f532 Initial revision claus parents: diff changeset	48
b1663ac8f532 Initial revision claus parents: diff changeset	49	leftMargin
b1663ac8f532 Initial revision claus parents: diff changeset	50	"return leftMargin"
b1663ac8f532 Initial revision claus parents: diff changeset	51
4770 6634b540fea2 Added PluggableHierarchicalList to define ad-hoc tree models. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3150 diff changeset	52	^ leftMargin
6634b540fea2 Added PluggableHierarchicalList to define ad-hoc tree models. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3150 diff changeset	53	!
29 b1663ac8f532 Initial revision claus parents: diff changeset	54
b1663ac8f532 Initial revision claus parents: diff changeset	55	leftMargin:something
b1663ac8f532 Initial revision claus parents: diff changeset	56	"set leftMargin"
b1663ac8f532 Initial revision claus parents: diff changeset	57
4770 6634b540fea2 Added PluggableHierarchicalList to define ad-hoc tree models. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3150 diff changeset	58	leftMargin := something.
6634b540fea2 Added PluggableHierarchicalList to define ad-hoc tree models. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3150 diff changeset	59	!
29 b1663ac8f532 Initial revision claus parents: diff changeset	60
b1663ac8f532 Initial revision claus parents: diff changeset	61	rightMargin
b1663ac8f532 Initial revision claus parents: diff changeset	62	"return rightMargin"
b1663ac8f532 Initial revision claus parents: diff changeset	63
4770 6634b540fea2 Added PluggableHierarchicalList to define ad-hoc tree models. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3150 diff changeset	64	^ rightMargin
6634b540fea2 Added PluggableHierarchicalList to define ad-hoc tree models. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3150 diff changeset	65	!
29 b1663ac8f532 Initial revision claus parents: diff changeset	66
b1663ac8f532 Initial revision claus parents: diff changeset	67	rightMargin:something
b1663ac8f532 Initial revision claus parents: diff changeset	68	"set rightMargin"
b1663ac8f532 Initial revision claus parents: diff changeset	69
4770 6634b540fea2 Added PluggableHierarchicalList to define ad-hoc tree models. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3150 diff changeset	70	rightMargin := something.
6634b540fea2 Added PluggableHierarchicalList to define ad-hoc tree models. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3150 diff changeset	71	! !
29 b1663ac8f532 Initial revision claus parents: diff changeset	72
1431 0cc20a8f2f7c docu & copyright Claus Gittinger <cg@exept.de> parents: 86 diff changeset	73	!ParagraphSpecification class methodsFor:'documentation'!
0cc20a8f2f7c docu & copyright Claus Gittinger <cg@exept.de> parents: 86 diff changeset	74
0cc20a8f2f7c docu & copyright Claus Gittinger <cg@exept.de> parents: 86 diff changeset	75	version
3150 e3a55f15ef7e package information Claus Gittinger <cg@exept.de> parents: 1431 diff changeset	76	^ '$Header: /cvs/stx/stx/libwidg2/ParagraphSpecification.st,v 1.6 2006-11-13 16:11:31 cg Exp $'
1431 0cc20a8f2f7c docu & copyright Claus Gittinger <cg@exept.de> parents: 86 diff changeset	77	! !
4770 6634b540fea2 Added PluggableHierarchicalList to define ad-hoc tree models. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3150 diff changeset	78

author	Jan Vrany <jan.vrany@labware.com>
	Thu, 09 Feb 2023 14:03:49 +0000
branch	jv
changeset 6265	09ae5bbed69e
parent 4770	6634b540fea2
permissions	-rw-r--r--