"{ 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
"Never, ever change this method. Ask JV or CG why"
^thisContext method mclass theNonMetaclass instVarNamed: #revision
!
version_SVN
^ '§Id:: §'
! !