--- a/Diff2.st	Fri Mar 16 20:24:01 2012 +0000
+++ b/Diff2.st	Fri Mar 16 22:44:50 2012 +0000
@@ -129,6 +129,20 @@
 "
 ! !
 
+!Diff2 class methodsFor:'instance creation'!
+
+new
+    "I'm abstract, so instantiate some default here"
+
+    ^self == Diff2 ifTrue:[
+        HuntMcilroy new
+    ] ifFalse:[
+        self basicNew initialize
+    ]
+
+    "Created: / 16-03-2012 / 20:16:52 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+! !
+
 !Diff2 class methodsFor:'accessing'!
 
 HuntMcilroy
@@ -800,5 +814,5 @@
 !Diff2 class methodsFor:'documentation'!
 
 version_SVN
-    ^ '$Id: Diff2.st 7928 2012-03-16 19:58:31Z vranyj1 $'
+    ^ '$Id: Diff2.st 7936 2012-03-16 22:44:50Z vranyj1 $'
 ! !