--- a/MCVersionList.st Tue Dec 23 20:48:43 2014 +0100
+++ b/MCVersionList.st Sun Feb 01 15:14:41 2015 +0100
@@ -1,5 +1,7 @@
"{ Package: 'stx:goodies/monticello' }"
+"{ NameSpace: Smalltalk }"
+
MCBrowserList subclass:#MCVersionList
instanceVariableNames:''
classVariableNames:''
@@ -52,8 +54,8 @@
ifTrue:[vn1 > vn2]
ifFalse:[v1 name > v2 name]].
generator do:[:verentry|list add: verentry].
- listHolder value: list.
- listValid := true.
+ self listHolder value: list.
+ self setListValid:true.
].
"Modified: / 13-10-2010 / 15:32:07 / Jan Vrany <jan.vrany@fit.cvut.cz>"
@@ -63,13 +65,14 @@
!MCVersionList class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/goodies/monticello/MCVersionList.st,v 1.4 2012-09-11 21:15:40 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/goodies/monticello/MCVersionList.st,v 1.5 2015-02-01 14:14:41 cg Exp $'
!
version_CVS
- ^ '$Header: /cvs/stx/stx/goodies/monticello/MCVersionList.st,v 1.4 2012-09-11 21:15:40 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/goodies/monticello/MCVersionList.st,v 1.5 2015-02-01 14:14:41 cg Exp $'
!
version_SVN
- ^ '§Id: MCVersionList.st 19 2010-10-14 10:51:48Z vranyj1 §'
+ ^ '$Id: MCVersionList.st,v 1.5 2015-02-01 14:14:41 cg Exp $'
! !
+