--- a/MCVersionNotification.st	Sat Aug 20 13:41:27 2011 +0200
+++ b/MCVersionNotification.st	Sat Aug 20 13:41:33 2011 +0200
@@ -21,10 +21,10 @@
 !
 
 initializeWithVersion: aVersion repository: aRepository
-	version _ aVersion.
-	repository _ aRepository.
-	ancestor _ repository closestAncestorVersionFor: version info ifNone: []. 
-	changes _ ancestor
+	version := aVersion.
+	repository := aRepository.
+	ancestor := repository closestAncestorVersionFor: version info ifNone: []. 
+	changes := ancestor
 				ifNil: [#()]
 				ifNotNil: [(version snapshot patchRelativeToBase: ancestor snapshot) 							operations asSortedCollection]
 !
@@ -46,7 +46,7 @@
 
 messageTo: aString
 	| message |
-	message _ MailMessage empty.
+	message := MailMessage empty.
 	message setField: 'from' toString: self fromAddress.
 	message setField: 'to' toString: aString.
 	message setField: 'subject' toString: '[MC] ', version info name.
@@ -56,7 +56,7 @@
 
 notify: aString
 	| message |
-	message _ self messageTo: aString.
+	message := self messageTo: aString.
 	SMTPClient
 		deliverMailFrom: message from
 		to: (Array with: message to)
@@ -66,6 +66,10 @@
 
 !MCVersionNotification class methodsFor:'documentation'!
 
-version
-    ^ '$Header: /cvs/stx/stx/goodies/monticello/MCVersionNotification.st,v 1.1 2006-11-22 13:23:03 cg Exp $'
+version_CVS
+    ^ '$Header: /cvs/stx/stx/goodies/monticello/MCVersionNotification.st,v 1.2 2011-08-20 11:41:33 cg Exp $'
+!
+
+version_SVN
+    ^ '§Id: MCVersionNotification.st 5 2010-08-29 07:30:29Z vranyj1 §'
 ! !