--- a/TwoColumnTextView.st	Tue May 11 13:43:14 2010 +0200
+++ b/TwoColumnTextView.st	Thu May 20 11:42:26 2010 +0200
@@ -176,6 +176,36 @@
     "Modified: 15.8.1996 / 19:46:38 / cg"
 !
 
+openOn:firstText label:firstLabel and:secondText label:secondLabel title:titleOrNil
+    "open up a view showing firstText and secondText side-by-side,
+     and labels for both views.
+     This does not make much sense for unrelated texts - of course."
+    
+    |top v|
+
+    top := StandardSystemView new.
+    titleOrNil notNil ifTrue:[ top label:titleOrNil ].
+    v := self 
+            openOn:firstText
+            label:firstLabel
+            and:secondText
+            label:secondLabel
+            in:top.
+    top open.
+    ^ v
+
+    "
+     TwoColumnTextView
+        openOn:('smalltalk.rc' asFilename contentsOfEntireFile)
+        label:'smalltalk.rc'
+        and:('display.rc' asFilename contentsOfEntireFile)
+        label:'display.rc'
+    "
+    "Modified: 15.8.1996 / 19:46:38 / cg"
+! !
+
+!TwoColumnTextView class methodsFor:'instance creation-basic'!
+
 openOn:firstText label:firstLabel and:secondText label:secondLabel in:aView
     "open up a view showing firstText and secondText side-by-side,
      and labels for both views. Return the (wrapped) diff-view.
@@ -207,34 +237,6 @@
     scr moveToNextChanged.
 
     ^ scr.
-!
-
-openOn:firstText label:firstLabel and:secondText label:secondLabel title:titleOrNil
-    "open up a view showing firstText and secondText side-by-side,
-     and labels for both views.
-     This does not make much sense for unrelated texts - of course."
-    
-    |top v|
-
-    top := StandardSystemView new.
-    titleOrNil notNil ifTrue:[ top label:titleOrNil ].
-    v := self 
-            openOn:firstText
-            label:firstLabel
-            and:secondText
-            label:secondLabel
-            in:top.
-    top open.
-    ^ v
-
-    "
-     TwoColumnTextView
-        openOn:('smalltalk.rc' asFilename contentsOfEntireFile)
-        label:'smalltalk.rc'
-        and:('display.rc' asFilename contentsOfEntireFile)
-        label:'display.rc'
-    "
-    "Modified: 15.8.1996 / 19:46:38 / cg"
 ! !
 
 !TwoColumnTextView class methodsFor:'specification'!
@@ -394,9 +396,9 @@
 !TwoColumnTextView class methodsFor:'documentation'!
 
 version
-^ '$Header: /cvs/stx/stx/libwidg2/TwoColumnTextView.st,v 1.24 2009-10-06 10:26:19 cg Exp $'
+^ '$Header: /cvs/stx/stx/libwidg2/TwoColumnTextView.st,v 1.25 2010-05-20 09:42:26 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libwidg2/TwoColumnTextView.st,v 1.24 2009-10-06 10:26:19 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg2/TwoColumnTextView.st,v 1.25 2010-05-20 09:42:26 cg Exp $'
 ! !