#REFACTORING by cg
class: Tools::ProjectBuilderAssistantApplication
changed:
#doBrowseApplication
#doBrowseProject
#doBrowseProjectDefinitionClass
#doBrowseProjectDefinitionClassForPrereqs
#doBrowseStartupClass
--- a/Tools__ProjectBuilderAssistantApplication.st Fri Sep 01 14:27:15 2017 +0200
+++ b/Tools__ProjectBuilderAssistantApplication.st Fri Sep 01 14:27:28 2017 +0200
@@ -2070,9 +2070,11 @@
self hasApplicationSelected ifTrue:[
appClass := self listOfApplicationsInProject value at:(self selectedApplicationIndexHolder value).
- UserPreferences systemBrowserClass
+ SystemBrowser default
openInClass:appClass class selector:#windowSpec.
].
+
+ "Modified: / 01-09-2017 / 14:23:06 / cg"
!
doBrowseBuildDirectory
@@ -2094,7 +2096,9 @@
doBrowseProject
<resource: #uiCallback>
- UserPreferences systemBrowserClass openOnPackage:selectedProjectDefinition package.
+ SystemBrowser default openOnPackage:selectedProjectDefinition package.
+
+ "Modified: / 01-09-2017 / 14:23:09 / cg"
!
doBrowseProjectDefinitionClass
@@ -2104,9 +2108,11 @@
self hasProjectSelected ifTrue:[
defClass := self selectedProjectDefinition.
- UserPreferences systemBrowserClass
+ SystemBrowser default
openInClass:defClass class selector:#classNamesAndAttributes.
].
+
+ "Modified: / 01-09-2017 / 14:23:12 / cg"
!
doBrowseProjectDefinitionClassForPrereqs
@@ -2116,9 +2122,11 @@
self hasProjectSelected ifTrue:[
defClass := self selectedProjectDefinition.
- UserPreferences systemBrowserClass
+ SystemBrowser default
openInClass:defClass class selector:#referencedPreRequisites "/ #mandatoryPreRequisites.
].
+
+ "Modified: / 01-09-2017 / 14:23:15 / cg"
!
doBrowseStartupClass
@@ -2128,9 +2136,11 @@
self hasStartupClassSelected ifTrue:[
startupClass := self listOfStartupClassesInProject value at:(self selectedStartupClassIndexHolder value).
- UserPreferences systemBrowserClass
+ SystemBrowser default
openInClass:startupClass class selector:#main:.
].
+
+ "Modified: / 01-09-2017 / 14:23:18 / cg"
!
doCheckin