Fix for ChangeSet and Inspector2 - enforce usage of Tools::ChangeSetBrowser2
authorvrany
Sat, 06 Aug 2011 22:52:04 +0200
changeset 10522 a05002175fbd
parent 10521 9218a2f4a6d1
child 10523 ff18a902b162
Fix for ChangeSet and Inspector2 - enforce usage of Tools::ChangeSetBrowser2
extensions.st
--- a/extensions.st	Sat Aug 06 14:50:14 2011 +0200
+++ b/extensions.st	Sat Aug 06 22:52:04 2011 +0200
@@ -155,10 +155,13 @@
     ^self newInspector2Tab
         label: 'Changes';    
         priority: 75;
-        application: (UserPreferences current changeSetBrowserClass on: self)
+        "JV@2011-08-06: Cannot do 'UserPreferences current changeSetBrowserClass'
+         here since ChangeSetBrowser has no #on: and it is not an application model.
+         Thus, enforce Tools::ChangeSetBrowser2 here..."
+        application: ((Tools::ChangeSetBrowser2 on: self) beOneColumn; yourself)
 
-    "Modified: / 18-07-2011 / 16:26:03 / Jan Vrany <jan.vrany@fit.cvut.cz>"
     "Modified: / 25-07-2011 / 12:22:07 / sr"
+    "Modified: / 06-08-2011 / 21:22:46 / Jan Vrany <jan.vrany@fit.cvut.cz>"
 ! !
 
 !ChangeSet methodsFor:'inspecting'!
@@ -1651,5 +1654,5 @@
 !stx_libtool class methodsFor:'documentation'!
 
 extensionsVersion_CVS
-    ^ '$Header: /cvs/stx/stx/libtool/extensions.st,v 1.52 2011-08-05 11:10:18 vrany Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/extensions.st,v 1.53 2011-08-06 20:52:04 vrany Exp $'
 ! !
\ No newline at end of file