version_HG changed to return string.
Bu default, there is no real changeset id in the string (unless
KeywordsExtension is enabled). However, there is no need for stc
itself now embeds changeset id into binary revision.
"{ Package: 'stx:libscm/mercurial' }"
HGRepositoryObject subclass:#HGBranch
instanceVariableNames:'name active closed'
classVariableNames:''
poolDictionaries:''
category:'SCM-Mercurial-Core'
!
!HGBranch methodsFor:'accessing'!
heads
"Returns a list of heads (as HGChangeset) of receicer"
^repository heads select:[:cs|cs branches includes: self].
"Created: / 27-11-2012 / 21:38:40 / Jan Vrany <jan.vrany@fit.cvut.cz>"
!
name
"Returns a branche's name"
^ name
"Modified (comment): / 22-10-2012 / 19:59:44 / Jan Vrany <jan.vrany@fit.cvut.cz>"
! !
!HGBranch methodsFor:'initialization'!
initialize
"Invoked when a new instance is created."
active := true.
closed := false.
"Created: / 27-11-2012 / 19:34:41 / Jan Vrany <jan.vrany@fit.cvut.cz>"
!
setActive: aBoolean
active := aBoolean
"Created: / 27-11-2012 / 19:31:29 / Jan Vrany <jan.vrany@fit.cvut.cz>"
!
setClosed: aBoolean
closed := aBoolean
"Created: / 27-11-2012 / 19:31:34 / Jan Vrany <jan.vrany@fit.cvut.cz>"
!
setName: aString
name := aString
"Created: / 22-10-2012 / 20:00:38 / Jan Vrany <jan.vrany@fit.cvut.cz>"
! !
!HGBranch methodsFor:'testing'!
isActive
^active
"Created: / 27-11-2012 / 19:32:01 / Jan Vrany <jan.vrany@fit.cvut.cz>"
!
isClosed
^closed
"Created: / 27-11-2012 / 19:32:12 / Jan Vrany <jan.vrany@fit.cvut.cz>"
! !
!HGBranch class methodsFor:'documentation'!
version_HG
^ '$Changeset: <not expanded> $'
!
version_SVN
^ '§Id:: §'
! !