Added the WAPluggablePresenter class that allows to instantiate a pre…

…senter with a rendering block
SeasideSt · Aug 20, 2023 · c971b5c · c971b5c
1 parent 76d2474
commit c971b5c
Show file tree

Hide file tree

Showing 4 changed files with 19 additions and 0 deletions.
diff --git a/repository/Seaside-Component.package/WAPluggablePresenter.class/README.md b/repository/Seaside-Component.package/WAPluggablePresenter.class/README.md
diff --git a/repository/Seaside-Component.package/WAPluggablePresenter.class/instance/block..st b/repository/Seaside-Component.package/WAPluggablePresenter.class/instance/block..st
@@ -0,0 +1,3 @@
+accessing
+block: aBlock
+	block := aBlock
diff --git a/repository/Seaside-Component.package/WAPluggablePresenter.class/instance/renderContentOn..st b/repository/Seaside-Component.package/WAPluggablePresenter.class/instance/renderContentOn..st
@@ -0,0 +1,3 @@
+rendering
+renderContentOn: html
+	block value: html
diff --git a/repository/Seaside-Component.package/WAPluggablePresenter.class/properties.json b/repository/Seaside-Component.package/WAPluggablePresenter.class/properties.json
@@ -0,0 +1,13 @@
+{
+	"commentStamp" : "",
+	"super" : "WAComponent",
+	"category" : "Seaside-Component-Base",
+	"classinstvars" : [ ],
+	"pools" : [ ],
+	"classvars" : [ ],
+	"instvars" : [
+		"block"
+	],
+	"name" : "WAPluggablePresenter",
+	"type" : "normal"
+}