<HTML>
<HEAD>
<TITLE>A idea</TITLE>
</HEAD>
<BODY>
<FONT SIZE="4"><FONT FACE="Calibri, Verdana, Helvetica, Arial"><SPAN STYLE='font-size:11pt'>Again I said we should have the number of update <BR>
<BR>
My own is<BR>
<BR>
!MCPackageLoader methodsFor: 'private' stamp: 'edc 9/1/2009 03:37' prior: 34174438!<BR>
useChangeSetNamed: baseName during: aBlock<BR>
&nbsp;&nbsp;&nbsp;&nbsp;&quot;Use the named change set, or create one with the given name.&quot;<BR>
&nbsp;&nbsp;&nbsp;&nbsp;| changeHolder oldChanges newChanges csName |<BR>
<BR>
&nbsp;&nbsp;&nbsp;&nbsp;changeHolder := (ChangeSet respondsTo: #newChanges:)<BR>
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;ifTrue: [ChangeSet]<BR>
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;ifFalse: [Smalltalk].<BR>
&nbsp;&nbsp;&nbsp;&nbsp;oldChanges := (ChangeSet respondsTo: #current)<BR>
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;ifTrue: [ChangeSet current]<BR>
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;ifFalse: [Smalltalk changes].<BR>
csName := (SystemVersion current highestUpdate + 1) asString,baseName.<BR>
&nbsp;&nbsp;&nbsp;&nbsp;newChanges := (ChangesOrganizer changeSetNamed: csName) ifNil: [ ChangeSet new name: csName ].<BR>
&nbsp;&nbsp;&nbsp;&nbsp;changeHolder newChanges: newChanges.<BR>
&nbsp;&nbsp;&nbsp;&nbsp;[aBlock value] ensure: [changeHolder newChanges: oldChanges].<BR>
SystemVersion current registerUpdate: SystemVersion current highestUpdate + 1<BR>
! !<BR>
<BR>
Also , at the end of daily updates from trunk, we should have <BR>
<BR>
MCFileBasedRepository flushAllCaches.<BR>
<BR>
My 5 centavos de peso , less of 1 cent of euro<BR>
<BR>
Edgar</SPAN></FONT></FONT>
</BODY>
</HTML>