MCRepositoryBrowser.st
changeset 503 fff20d405433
parent 502 8842b23dd67c
child 516 41006ee80f02
--- a/MCRepositoryBrowser.st	Wed Sep 07 20:16:26 2011 +0200
+++ b/MCRepositoryBrowser.st	Wed Sep 07 20:25:31 2011 +0200
@@ -880,13 +880,15 @@
             [:def|def asChange]).
 
     (Tools::ChangeSetBrowser2
-        on: unloadables 
-        label: version info name  , ' (unloadable definitions)')
+            on: unloadables 
+            label: version info name  , ' (unloadable definitions)')
         beTwoColumn;
+        targetNamespace:targetNamespace;
+        targetPackage:targetPackage;
         open
 
     "Modified: / 26-10-2010 / 23:04:45 / Jan Vrany <jan.vrany@fit.cvut.cz>"
-    "Modified: / 20-08-2011 / 18:40:24 / cg"
+    "Modified: / 07-09-2011 / 20:17:15 / cg"
 !
 
 versionBrowser
@@ -898,14 +900,16 @@
         version ifNil:[^self].
         snapshot := version snapshot.
         (Tools::ChangeSetBrowser2 
-            on: snapshot asChangeSet
-            label: version info name)
+                on: snapshot asChangeSet
+                label: version info name)
             beTwoColumn;
+            targetNamespace:targetNamespace;
+            targetPackage:targetPackage;
             open
     ].
 
     "Modified: / 04-08-2011 / 19:03:51 / Jan Vrany <jan.vrany@fit.cvut.cz>"
-    "Modified: / 29-08-2011 / 08:21:53 / cg"
+    "Modified: / 07-09-2011 / 20:17:36 / cg"
 !
 
 versionInspect
@@ -1003,11 +1007,11 @@
 !MCRepositoryBrowser class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/goodies/monticello/MCRepositoryBrowser.st,v 1.13 2011-09-07 18:16:26 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/goodies/monticello/MCRepositoryBrowser.st,v 1.14 2011-09-07 18:25:31 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/goodies/monticello/MCRepositoryBrowser.st,v 1.13 2011-09-07 18:16:26 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/goodies/monticello/MCRepositoryBrowser.st,v 1.14 2011-09-07 18:25:31 cg Exp $'
 !
 
 version_SVN