--- a/MCPatcher.st Sat Aug 20 13:48:13 2011 +0200
+++ b/MCPatcher.st Sat Aug 20 13:48:18 2011 +0200
@@ -12,7 +12,7 @@
apply: aPatch to: aSnapshot
| loader |
- loader _ self snapshot: aSnapshot.
+ loader := self snapshot: aSnapshot.
aPatch applyTo: loader.
^ loader patchedSnapshot
!
@@ -28,7 +28,7 @@
!
initializeWithSnapshot: aSnapshot
- definitions _ MCDefinitionIndex definitions: aSnapshot definitions
+ definitions := MCDefinitionIndex definitions: aSnapshot definitions
!
modifyDefinition: baseDefinition to: targetDefinition
@@ -46,5 +46,13 @@
!MCPatcher class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/goodies/monticello/MCPatcher.st,v 1.1 2006-11-22 13:12:35 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/goodies/monticello/MCPatcher.st,v 1.2 2011-08-20 11:48:18 cg Exp $'
+!
+
+version_CVS
+ ^ '$Header: /cvs/stx/stx/goodies/monticello/MCPatcher.st,v 1.2 2011-08-20 11:48:18 cg Exp $'
+!
+
+version_SVN
+ ^ '§Id: MCPatcher.st 5 2010-08-29 07:30:29Z vranyj1 §'
! !