ParagraphSpecification.st
changeset 29 b1663ac8f532
child 36 160b8f0dfd7d
--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/ParagraphSpecification.st	Mon Nov 21 17:49:40 1994 +0100
@@ -0,0 +1,31 @@
+'From Smalltalk/X, Version:2.10.4 on 18-nov-1994 at 16:12:06'!
+
+TabulatorSpecification subclass:#ParagraphSpecification
+	 instanceVariableNames:'leftMargin rightMargin textAlignment'
+	 classVariableNames:''
+	 poolDictionaries:''
+	 category:'Views-Support'
+!
+
+!ParagraphSpecification methodsFor:'accessing'!
+
+leftMargin
+    "return leftMargin"
+
+    ^ leftMargin!
+
+leftMargin:something
+    "set leftMargin"
+
+    leftMargin := something.!
+
+rightMargin
+    "return rightMargin"
+
+    ^ rightMargin!
+
+rightMargin:something
+    "set rightMargin"
+
+    rightMargin := something.! !
+