From ce54a9ac28cb1e6ec1d72699ec8e17d19a33b2dd Mon Sep 17 00:00:00 2001 From: Offray Luna Date: Fri, 16 Jul 2021 16:52:53 -0500 Subject: [PATCH] Testing first extensions. Maybe a more minimal infrastructure can be used. --- src/LepiterPlugins/GfLeSnippet.class.st | 5 +++++ src/LepiterPlugins/LeSnippet.extension.st | 8 ++++++++ 2 files changed, 13 insertions(+) create mode 100644 src/LepiterPlugins/GfLeSnippet.class.st create mode 100644 src/LepiterPlugins/LeSnippet.extension.st diff --git a/src/LepiterPlugins/GfLeSnippet.class.st b/src/LepiterPlugins/GfLeSnippet.class.st new file mode 100644 index 0000000..5ea523b --- /dev/null +++ b/src/LepiterPlugins/GfLeSnippet.class.st @@ -0,0 +1,5 @@ +Class { + #name : #GfLeSnippet, + #superclass : #Object, + #category : #LepiterPlugins +} diff --git a/src/LepiterPlugins/LeSnippet.extension.st b/src/LepiterPlugins/LeSnippet.extension.st new file mode 100644 index 0000000..a998adb --- /dev/null +++ b/src/LepiterPlugins/LeSnippet.extension.st @@ -0,0 +1,8 @@ +Extension { #name : #LeSnippet } + +{ #category : #'*LepiterPlugins' } +LeSnippet >> index [ + | uuids | + uuids := self parent children collect: [:each | each uidString ]. + ^ uuids +]