#FEATURE by cg
authorClaus Gittinger <cg@exept.de>
Fri, 10 Feb 2017 20:09:36 +0100
changeset 6088 ffb5be6c8bca
parent 6087 0c7c2f8ebcb8
child 6089 72067de3f99b
#FEATURE by cg class: Label added: #verticalSpace
Label.st
--- a/Label.st	Fri Feb 10 19:42:47 2017 +0100
+++ b/Label.st	Fri Feb 10 20:09:36 2017 +0100
@@ -1277,6 +1277,13 @@
     fixSize := aBoolean
 !
 
+verticalSpace
+    "get the number of pixels by which the logo
+     is vertically inset from the border"
+
+    ^ vSpace
+!
+
 verticalSpace:aNumber
     "set the number of pixels by which the logo
      is vertically inset from the border"