Skip to content

Commit

Permalink
update 26 to fix issue #423
Browse files Browse the repository at this point in the history
  • Loading branch information
@brunobuzzi
brunobuzzi committed Jul 24, 2021
1 parent 588e74a commit 940c2a5
Show file tree
Hide file tree
Showing 13 changed files with 98 additions and 5 deletions.
6 changes: 6 additions & 0 deletions repository/Orbeon.package/OrbeonAbstractFormDefinition.class/class/newNamed.in..st
View file
Original file line number Diff line number Diff line change
@@ -0,0 +1,6 @@
other
newNamed: formName in: anOrbeonApplication
"Answer a new instance of the receiver in OrbeonApplication named <app> with form named <formName>.
If the OrbeonApplication does not exist --> a new one is created"

^self new setApplication: anOrbeonApplication formName: formName
6 changes: 6 additions & 0 deletions ...ory/Orbeon.package/OrbeonAbstractFormDefinition.class/class/newNamed.inBpmApplication..st
View file
Original file line number Diff line number Diff line change
@@ -0,0 +1,6 @@
other
newNamed: form inBpmApplication: aBpmApplication
"Answer a new instance of the receiver in OrbeonApplication named <app> with form named <form>.
If the OrbeonApplication does not exist --> a new one is created"

^self new setBpmApplication: aBpmApplication formName: form
5 changes: 5 additions & 0 deletions ...ry/Orbeon.package/OrbeonAbstractFormDefinition.class/instance/setApplication.formName..st
View file
Original file line number Diff line number Diff line change
@@ -0,0 +1,5 @@
private
setApplication: anOrbeonApplication formName: fName

application := anOrbeonApplication.
formName := fName
5 changes: 5 additions & 0 deletions ...ackage/OrbeonAbstractFormDefinition.class/instance/setBpmApplication.inBpmApplication..st
View file
Original file line number Diff line number Diff line change
@@ -0,0 +1,5 @@
private
setBpmApplication: form inBpmApplication: aBpmApplication

application := aBpmApplication.
formName := form
6 changes: 5 additions & 1 deletion repository/Orbeon.package/OrbeonAbstractFormDefinition.class/methodProperties.json
View file
Original file line number Diff line number Diff line change
Expand Up @@ -3,8 +3,10 @@
"fileOutForm:to:" : "brunobb 07/16/2020 11:36",
"initializeMapDictionary" : "brunobb 07/16/2020 11:36",
"mapDictionary" : "brunobb 07/16/2020 11:36",
"newNamed:in:" : "brunobb 07/24/2021 14:12",
"newNamed:inAppNamed:" : "brunobb 07/16/2020 11:36",
"newNamed:inBpmAppNamed:" : "brunobb 03/25/2021 14:35" },
"newNamed:inBpmAppNamed:" : "brunobb 03/25/2021 14:35",
"newNamed:inBpmApplication:" : "brunobb 07/24/2021 14:14" },
"instance" : {
"allVersionsDo:" : "brunobb 07/16/2020 13:11",
"application" : "brunobb 07/16/2020 11:36",
Expand All @@ -29,8 +31,10 @@
"printOn:" : "brunobb 02/02/2021 13:21",
"savedDefinitionsDo:" : "brunobb 07/16/2020 13:11",
"setApplication:" : "brunobb 07/24/2021 12:45",
"setApplication:formName:" : "brunobb 07/24/2021 14:13",
"setAvailableNodeWith:" : "brunobb 04/15/2021 14:48",
"setBpmApplication:" : "brunobb 07/24/2021 12:44",
"setBpmApplication:inBpmApplication:" : "brunobb 07/24/2021 14:14",
"setMetadata" : "brunobb 04/15/2021 14:48",
"setMetadataWith:" : "brunobb 07/24/2021 12:44",
"setRegistry:" : "brunobb 07/16/2020 12:17",
Expand Down
6 changes: 6 additions & 0 deletions ...beon.package/OrbeonSystemRoot.class/instance/buildPublishedFormNamed.title.withXml.in..st
View file
Original file line number Diff line number Diff line change
@@ -0,0 +1,6 @@
forms - builder
buildPublishedFormNamed: formName title: title withXml: xmlDefinition in: anOrbeonApplication
"The receiver create a new <OrbeonPublishedFormDefinition> named <formName> in Application named <anOrbeonApplication>.
The XML of the form is <xmlDefinition> "

^self buildPublishedFormNamed: formName version: 1 title: title withXml: xmlDefinition in: anOrbeonApplication
27 changes: 27 additions & 0 deletions ...Root.class/instance/buildPublishedFormNamed.version.title.publishedXml.savedXml.id.in..st
View file
Original file line number Diff line number Diff line change
@@ -0,0 +1,27 @@
forms - builder
buildPublishedFormNamed: formName version: version title: title publishedXml: publishedXml savedXml: savedXml id: stringId in: anOrbeonApplication
"The receiver create a new <OrbeonPublishedFormDefinition> named <formName> in Application named <anOrbeonApplication>.
The XML of the form is <xmlDefinition> "
| publishedDefinition savedDefinition |

savedDefinition := OrbeonSavedFormDefinition newNamed: formName in: anOrbeonApplication.
savedDefinition id: stringId;
version: version;
xmlString: savedXml;
title: title.

savedDefinition
storeInApplication;
buildForm.

publishedDefinition := OrbeonPublishedFormDefinition newNamed: formName in: anOrbeonApplication.
publishedDefinition id: stringId;
xmlString: publishedXml;
version: version;
title: title.

publishedDefinition associateSavedAndPublishedForms.

publishedDefinition storeInApplication.

^publishedDefinition
12 changes: 12 additions & 0 deletions ...e/OrbeonSystemRoot.class/instance/buildPublishedFormNamed.version.title.withXml.id.in..st
View file
Original file line number Diff line number Diff line change
@@ -0,0 +1,12 @@
forms - builder
buildPublishedFormNamed: formName version: version title: title withXml: xmlDefinition id: anUIID in: anOrbeonApplication
"The receiver create a new <OrbeonPublishedFormDefinition> named <formName> in Application named <anOrbeonApplication>.
The XML of the form is <xmlDefinition> "

^self buildPublishedFormNamed: formName
version: version
title: title
publishedXml: xmlDefinition
savedXml: xmlDefinition
id: anUIID
in: anOrbeonApplication
11 changes: 11 additions & 0 deletions ...kage/OrbeonSystemRoot.class/instance/buildPublishedFormNamed.version.title.withXml.in..st
View file
Original file line number Diff line number Diff line change
@@ -0,0 +1,11 @@
forms - builder
buildPublishedFormNamed: formName version: version title: title withXml: xmlDefinition in: anOrbeonApplication
"The receiver create a new <OrbeonPublishedFormDefinition> named <formName> in Application named <anOrbeonApplication>.
The XML of the form is <xmlDefinition> "

^self buildPublishedFormNamed: formName
version: version
title: title
withXml: xmlDefinition
id: UUID new asString
in: anOrbeonApplication
4 changes: 4 additions & 0 deletions ...Orbeon.package/OrbeonSystemRoot.class/instance/getExistingApplicationOrCreateNewNamed..st
View file
Original file line number Diff line number Diff line change
@@ -0,0 +1,4 @@
applications
getExistingApplicationOrCreateNewNamed: aString

^self getExistingOrbeonApplicationOrCreateNewNamed: aString
6 changes: 4 additions & 2 deletions ....package/OrbeonSystemRoot.class/instance/getExistingOrbeonApplicationOrCreateNewNamed..st
View file
Original file line number Diff line number Diff line change
Expand Up @@ -4,6 +4,8 @@ getExistingOrbeonApplicationOrCreateNewNamed: applicationName

(applications includesKey: applicationName) ifTrue: [^applications at: applicationName].

application := OrbeonApplication newNamed: applicationName.
application := OrbeonApplication newNamed: applicationName on: self.

self registerApplication: application
self registerApplication: application.

^application
7 changes: 6 additions & 1 deletion repository/Orbeon.package/OrbeonSystemRoot.class/methodProperties.json
View file
Original file line number Diff line number Diff line change
Expand Up @@ -4,6 +4,10 @@
"instance" : {
"applicationNamed:" : "brunobb 07/22/2021 14:12",
"applicationNamed:ifNone:" : "brunobb 07/22/2021 14:11",
"buildPublishedFormNamed:title:withXml:in:" : "brunobb 07/24/2021 13:58",
"buildPublishedFormNamed:version:title:publishedXml:savedXml:id:in:" : "brunobb 07/24/2021 14:23",
"buildPublishedFormNamed:version:title:withXml:id:in:" : "brunobb 07/24/2021 14:00",
"buildPublishedFormNamed:version:title:withXml:in:" : "brunobb 07/24/2021 13:58",
"createSystemDefaultObjects" : "brunobb 07/22/2021 13:39",
"doInCache:" : "brunobb 07/22/2021 14:03",
"formDefinitionNamed:in:" : "brunobb 07/22/2021 14:15",
Expand All @@ -12,7 +16,8 @@
"getAllInstances" : "brunobb 07/22/2021 14:52",
"getAllSavedDefinitions" : "brunobb 07/22/2021 14:56",
"getChartsFor:" : "brunobb 07/22/2021 13:41",
"getExistingOrbeonApplicationOrCreateNewNamed:" : "brunobb 07/22/2021 13:39",
"getExistingApplicationOrCreateNewNamed:" : "brunobb 07/24/2021 13:45",
"getExistingOrbeonApplicationOrCreateNewNamed:" : "brunobb 07/24/2021 13:41",
"getInstancesCreationDayDistributionQuantityFrom:to:satisfying:onError:" : "brunobb 07/22/2021 14:25",
"getInstancesCreationDistributionByMonthFrom:to:satisfying:onError:" : "brunobb 07/22/2021 14:20",
"getInstancesModificationDayDistributionQuantityFrom:to:satisfying:onError:" : "brunobb 07/22/2021 14:22",
Expand Down
2 changes: 1 addition & 1 deletion repository/Orbeon.package/monticello.meta/version
View file

Large diffs are not rendered by default.

0 comments on commit 940c2a5

Please sign in to comment.