[feenkcom/gtoolkit#4136] added id for LePage database action

feenkcom · Nov 4, 2024 · 4e60e0c · 4e60e0c
1 parent 4e9b6e7
commit 4e60e0c
Show file tree

Hide file tree

Showing 2 changed files with 11 additions and 0 deletions.
diff --git a/src/Lepiter-UI/LePage.extension.st b/src/Lepiter-UI/LePage.extension.st
@@ -152,6 +152,7 @@ LePage >> gtDatabaseActionFor: anAction [
 		tooltip: 'Inspect the page''s database';
 		priority: 8;
 		icon: LeIcons lepiterDatabase;
+		id: LePageDatabaseActionId;
 		action: [ :aButton | aButton phlow spawnObject: self database ]
 ]
 

diff --git a/src/Lepiter-UI/LePageDatabaseActionId.class.st b/src/Lepiter-UI/LePageDatabaseActionId.class.st
@@ -0,0 +1,10 @@
+Class {
+	#name : #LePageDatabaseActionId,
+	#superclass : #BlElementUniqueId,
+	#category : #'Lepiter-UI-Element IDs'
+}
+
+{ #category : #'as yet unclassified' }
+LePageDatabaseActionId >> asSymbol [
+	^ #'le-page--database-action'
+]