--- a/PerforceSourceCodeManagementSettingsAppl.st Fri Mar 25 16:40:20 2016 +0100
+++ b/PerforceSourceCodeManagementSettingsAppl.st Fri Mar 25 16:45:56 2016 +0100
@@ -11,6 +11,8 @@
"
"{ Package: 'stx:libtool' }"
+"{ NameSpace: Smalltalk }"
+
AbstractSourceCodeManagementSettingsAppl subclass:#PerforceSourceCodeManagementSettingsAppl
instanceVariableNames:'selectedPerModuleRoot perforceExecutableHolder
listOfPerforceModules defaultSettingsHolder tableColumns
@@ -761,20 +763,12 @@
!PerforceSourceCodeManagementSettingsAppl methodsFor:'aspects'!
checkLabel
- <resource: #uiAspect>
-
"automatically generated by UIPainter ..."
- "*** the code below creates a default model when invoked."
- "*** (which may not be the one you wanted)"
- "*** Please change as required and accept it in the browser."
- "*** (and replace this comment by something more useful ;-)"
+ <resource: #uiAspect>
checkLabel isNil ifTrue:[
checkLabel := 'Check' asValue.
-"/ if your app needs to be notified of changes, uncomment one of the lines below:
-"/ checkLabel addDependent:self.
-"/ checkLabel onChangeSend:#checkLabelChanged to:self.
].
^ checkLabel.
!
@@ -835,20 +829,12 @@
!
tableColumns
- <resource: #uiAspect>
-
"automatically generated by UIPainter ..."
- "*** the code below creates a default model when invoked."
- "*** (which may not be the one you wanted)"
- "*** Please change as required and accept it in the browser."
- "*** (and replace this comment by something more useful ;-)"
+ <resource: #uiAspect>
tableColumns isNil ifTrue:[
tableColumns := self class tableColumns asValue.
-"/ if your app needs to be notified of changes, uncomment one of the lines below:
-"/ tableColumns addDependent:self.
-"/ tableColumns onChangeSend:#tableColumnsChanged to:self.
].
^ tableColumns.
!
@@ -1178,14 +1164,9 @@
!PerforceSourceCodeManagementSettingsAppl::ManagerPerModuleApp methodsFor:'aspects'!
acceptChannel
- <resource: #uiAspect>
-
"automatically generated by UIPainter ..."
- "*** the code below creates a default model when invoked."
- "*** (which may not be the one you wanted)"
- "*** Please change as required and accept it in the browser."
- "*** (and replace this comment by something more useful ;-)"
+ <resource: #uiAspect>
acceptChannel isNil ifTrue:[
acceptChannel := TriggerValue new.
@@ -1194,58 +1175,35 @@
!
acceptEnableChannel
- <resource: #uiAspect>
-
"automatically generated by UIPainter ..."
- "*** the code below creates a default model when invoked."
- "*** (which may not be the one you wanted)"
- "*** Please change as required and accept it in the browser."
- "*** (and replace this comment by something more useful ;-)"
+ <resource: #uiAspect>
acceptEnableChannel isNil ifTrue:[
acceptEnableChannel := true asValue.
-"/ if your app needs to be notified of changes, uncomment one of the lines below:
-"/ acceptEnableChannel addDependent:self.
-"/ acceptEnableChannel onChangeSend:#acceptEnableChannelChanged to:self.
].
^ acceptEnableChannel.
!
moduleHolder
- <resource: #uiAspect>
-
"automatically generated by UIPainter ..."
- "*** the code below creates a default model when invoked."
- "*** (which may not be the one you wanted)"
- "*** Please change as required and accept it in the browser."
- "*** (and replace this comment by something more useful ;-)"
+ <resource: #uiAspect>
moduleHolder isNil ifTrue:[
moduleHolder := ValueHolder new.
-"/ if your app needs to be notified of changes, uncomment one of the lines below:
moduleHolder addDependent:self.
-"/ moduleHolder onChangeSend:#moduleHolderChanged to:self.
].
^ moduleHolder.
!
settingsHolder
- <resource: #uiAspect>
-
"automatically generated by UIPainter ..."
- "*** the code below creates a default model when invoked."
- "*** (which may not be the one you wanted)"
- "*** Please change as required and accept it in the browser."
- "*** (and replace this comment by something more useful ;-)"
+ <resource: #uiAspect>
settingsHolder isNil ifTrue:[
settingsHolder := ValueHolder new.
-"/ if your app needs to be notified of changes, uncomment one of the lines below:
-"/ settingsHolder addDependent:self.
-"/ settingsHolder onChangeSend:#settingsHolderChanged to:self.
].
^ settingsHolder.
! !
@@ -1392,14 +1350,14 @@
!PerforceSourceCodeManagementSettingsAppl class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libtool/PerforceSourceCodeManagementSettingsAppl.st,v 1.32 2014-05-23 08:16:21 stefan Exp $'
+ ^ '$Header$'
!
version_CVS
- ^ '$Header: /cvs/stx/stx/libtool/PerforceSourceCodeManagementSettingsAppl.st,v 1.32 2014-05-23 08:16:21 stefan Exp $'
+ ^ '$Header$'
!
version_SVN
- ^ '$Id: PerforceSourceCodeManagementSettingsAppl.st,v 1.32 2014-05-23 08:16:21 stefan Exp $'
+ ^ '$Id$'
! !