#REFACTORING by cg
authorClaus Gittinger <cg@exept.de>
Fri, 18 Nov 2016 18:07:08 +0100
changeset 17089 11cd8ad86d5f
parent 17088 4492c6d91ac5
child 17090 989bfed752f1
#REFACTORING by cg class: Tools::NewSystemBrowser changed: #showClassOwnershipGraph:
Tools__NewSystemBrowser.st
--- a/Tools__NewSystemBrowser.st	Fri Nov 18 18:05:32 2016 +0100
+++ b/Tools__NewSystemBrowser.st	Fri Nov 18 18:07:08 2016 +0100
@@ -19811,6 +19811,7 @@
 ! !
 
 
+
 !NewSystemBrowser methodsFor:'aspects-organization'!
 
 categoryMenuVisible
@@ -23681,6 +23682,7 @@
     ^ UserPreferences current useSearchBarInBrowser or:[self codeView searchBarActionBlock notNil]
 ! !
 
+
 !NewSystemBrowser methodsFor:'binding access'!
 
 menuFor:key
@@ -49901,6 +49903,7 @@
     "Modified: / 28-02-2012 / 16:48:38 / cg"
 ! !
 
+
 !NewSystemBrowser methodsFor:'menu actions-variables'!
 
 browseVarRefsOrModsWithTitle:browserTitle boxTitle:boxTitle variables:varType access:accessType all:browseAll
@@ -55200,7 +55203,8 @@
                     author := eachRevision at:#author.
                     author isNil ifTrue:[self halt].
                     revision := eachRevision at:#revision.
-                    date := Timestamp readFrom:(eachRevision at:#date).
+                    date := eachRevision timestamp.
+                    "/ date := Timestamp readFrom:(eachRevision at:#date).
                     stop ifTrue:[ ^ self ].
                     first ifTrue:[
                         codeStream := mgr getSourceStreamFor:aClass revision:revision.
@@ -58279,6 +58283,7 @@
     ^ navigationState projectListApplication
 ! !
 
+
 !NewSystemBrowser methodsFor:'private-history'!
 
 lastSearchPatterns