class: AbstractSourceCodeManager
changed: #checkinClass:fileName:directory:module:logMessage:force:
when asking for revision, must take the scm-manager specific version;
not the default one, to check if already in the repository.
--- a/AbstractSourceCodeManager.st Fri Nov 28 17:09:01 2014 +0100
+++ b/AbstractSourceCodeManager.st Fri Nov 28 17:31:22 2014 +0100
@@ -2076,7 +2076,7 @@
className := aClass name.
nameOfVersionMethodInClasses := self nameOfVersionMethodInClasses.
- (revision := aClass revision) isNil ifTrue:[
+ (revision := aClass revisionOfManager:self "revision") isNil ifTrue:[
force ifFalse:[
('SourceCodeManager [warning]: class ' , className, ' has no revision string') errorPrintCR.
@@ -3973,15 +3973,15 @@
!AbstractSourceCodeManager class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libbasic3/AbstractSourceCodeManager.st,v 1.332 2014-11-27 20:12:44 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libbasic3/AbstractSourceCodeManager.st,v 1.333 2014-11-28 16:31:22 cg Exp $'
!
version_CVS
- ^ '$Header: /cvs/stx/stx/libbasic3/AbstractSourceCodeManager.st,v 1.332 2014-11-27 20:12:44 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libbasic3/AbstractSourceCodeManager.st,v 1.333 2014-11-28 16:31:22 cg Exp $'
!
version_SVN
- ^ '$Id: AbstractSourceCodeManager.st,v 1.332 2014-11-27 20:12:44 cg Exp $'
+ ^ '$Id: AbstractSourceCodeManager.st,v 1.333 2014-11-28 16:31:22 cg Exp $'
! !