Browse Source

More class comments

Nicolas Petton 11 years ago
parent
commit
4f8dcae35c
2 changed files with 6 additions and 0 deletions
  1. 2 0
      js/Moka-Layouts.js
  2. 4 0
      st/Moka-Layouts.st

+ 2 - 0
js/Moka-Layouts.js

@@ -3,6 +3,7 @@ smalltalk.addPackage('Moka-Layouts');
 smalltalk.packages["Moka-Layouts"].transport = {"type":"amd","amdNamespace":"amber_core"};
 
 smalltalk.addClass('MKLayout', globals.Object, ['properties'], 'Moka-Layouts');
+globals.MKLayout.comment="I am responsible for the layout of a `MKLayoutView`.";
 smalltalk.addMethod(
 smalltalk.method({
 selector: "asCssString",
@@ -417,6 +418,7 @@ globals.MKPaneLayout);
 
 
 smalltalk.addClass('MKLayoutProperty', globals.Object, ['layout', 'value'], 'Moka-Layouts');
+globals.MKLayoutProperty.comment="I represent a single layout property.";
 smalltalk.addMethod(
 smalltalk.method({
 selector: "asCssString",

+ 4 - 0
st/Moka-Layouts.st

@@ -2,6 +2,8 @@ Smalltalk createPackage: 'Moka-Layouts'!
 Object subclass: #MKLayout
 	instanceVariableNames: 'properties'
 	package: 'Moka-Layouts'!
+!MKLayout commentStamp!
+I am responsible for the layout of a `MKLayoutView`.!
 
 !MKLayout methodsFor: 'accessing'!
 
@@ -180,6 +182,8 @@ borderTop: aNumber
 Object subclass: #MKLayoutProperty
 	instanceVariableNames: 'layout value'
 	package: 'Moka-Layouts'!
+!MKLayoutProperty commentStamp!
+I represent a single layout property.!
 
 !MKLayoutProperty methodsFor: 'accessing'!