class: Tools::NewSystemBrowser
authorClaus Gittinger <cg@exept.de>
Fri, 06 Sep 2013 00:48:24 +0200
changeset 13512 16ba5d93100b
parent 13511 82bd76e1575a
child 13513 97b651d76972
class: Tools::NewSystemBrowser changed:5 methods
Tools__NewSystemBrowser.st
--- a/Tools__NewSystemBrowser.st	Thu Sep 05 23:36:32 2013 +0200
+++ b/Tools__NewSystemBrowser.st	Fri Sep 06 00:48:24 2013 +0200
@@ -14,54 +14,54 @@
 "{ NameSpace: Tools }"
 
 SystemBrowser subclass:#NewSystemBrowser
-	instanceVariableNames:'environment navigationState bufferNameList selectedBuffer buffers
-		bufferUsageOrder browserCanvas immediateUpdate showClassPackages
-		lastMethodCategory lastMethodMoveClass browserCanvasType
-		syntaxColoringProcessRunning syntaxColoringProcess
-		methodInfoProcess browsletShowHideLabelHolder browserPageCanvas
-		isEmbedded'
-	classVariableNames:'LastNewProtocols LastProtocolRenames LastCategoryRenames
-		LastCategoryRenameOld LastCategoryRenameNew LastProjectMoves
-		LastNameSpaceMove LastMethodMoveOrCopyTargetClass
-		LastClassFilterBlockString LastMethodFilterBlockString
-		LastBreakPointConditionString LastIndividualChecks
-		LastAcceptPackage LastVariableRenames LastVisitorClassName
-		LastTemporaryVariableName FindHistory
-		CheckForInstancesWhenRemovingClasses SynchronousUpdate
-		DoubleClickIsOpenBrowser ShowMethodTemplateWhenProtocolIsSelected
-		DefaultShowMethodInheritance DefaultEmphasizeUnloadedClasses
-		DefaultImmediateSyntaxColoring DefaultImmediateExplaining
-		DefaultSyntaxColoring DefaultToolBarVisible
-		DefaultCodeInfoVisible DefaultShortNameInTabs
-		DefaultHideUnloadedClasses DefaultMarkApplications
-		DefaultAutoFormat DefaultShowMethodComplexity
-		DefaultShowMethodTypeIcon DefaultShowSpecialResourceEditors
-		SharedMethodCategoryCache LastMethodProcessingBlockString
-		LastLoadedPackages DefaultShortAllClassesInNameSpaceOrganisation
-		LastBaseVersionTag DefaultShowPseudoProtocols
-		DefaultShowMultitabMode LastRenamedOld LastRenamedNew
-		LastImportedPackage LastLintRules NewNavigationHistory
-		LastLiteralReplacementType LastLiteralReplacementNewName
-		LastLiteralReplacementOldLiteral LastNewProjectType
-		LastClassProcessingBlockString RecentlyClosedList
-		LastClassSearchBoxShowedFullName CachedTagToRevisionMapping
-		CachedMethodsImplemented'
-	poolDictionaries:''
-	category:'Interface-Browsers-New'
+        instanceVariableNames:'environment navigationState bufferNameList selectedBuffer buffers
+                bufferUsageOrder browserCanvas immediateUpdate showClassPackages
+                lastMethodCategory lastMethodMoveClass browserCanvasType
+                syntaxColoringProcessRunning syntaxColoringProcess
+                methodInfoProcess browsletShowHideLabelHolder browserPageCanvas
+                isEmbedded'
+        classVariableNames:'LastNewProtocols LastProtocolRenames LastCategoryRenames
+                LastCategoryRenameOld LastCategoryRenameNew LastProjectMoves
+                LastNameSpaceMove LastMethodMoveOrCopyTargetClass
+                LastClassFilterBlockString LastMethodFilterBlockString
+                LastBreakPointConditionString LastIndividualChecks
+                LastAcceptPackage LastVariableRenames LastVisitorClassName
+                LastTemporaryVariableName FindHistory
+                CheckForInstancesWhenRemovingClasses SynchronousUpdate
+                DoubleClickIsOpenBrowser ShowMethodTemplateWhenProtocolIsSelected
+                DefaultShowMethodInheritance DefaultEmphasizeUnloadedClasses
+                DefaultImmediateSyntaxColoring DefaultImmediateExplaining
+                DefaultSyntaxColoring DefaultToolBarVisible
+                DefaultCodeInfoVisible DefaultShortNameInTabs
+                DefaultHideUnloadedClasses DefaultMarkApplications
+                DefaultAutoFormat DefaultShowMethodComplexity
+                DefaultShowMethodTypeIcon DefaultShowSpecialResourceEditors
+                SharedMethodCategoryCache LastMethodProcessingBlockString
+                LastLoadedPackages DefaultShortAllClassesInNameSpaceOrganisation
+                LastBaseVersionTag DefaultShowPseudoProtocols
+                DefaultShowMultitabMode LastRenamedOld LastRenamedNew
+                LastImportedPackage LastLintRules NewNavigationHistory
+                LastLiteralReplacementType LastLiteralReplacementNewName
+                LastLiteralReplacementOldLiteral LastNewProjectType
+                LastClassProcessingBlockString RecentlyClosedList
+                LastClassSearchBoxShowedFullName CachedTagToRevisionMapping
+                CachedMethodsImplemented'
+        poolDictionaries:''
+        category:'Interface-Browsers-New'
 !
 
 ListEntry subclass:#OwnershipGraph
-	instanceVariableNames:'ownershipInfo cachedForm'
-	classVariableNames:''
-	poolDictionaries:''
-	privateIn:NewSystemBrowser
+        instanceVariableNames:'ownershipInfo cachedForm'
+        classVariableNames:''
+        poolDictionaries:''
+        privateIn:NewSystemBrowser
 !
 
 Object subclass:#RevisionOwnershipInfo
-	instanceVariableNames:'revision author date lineOwnership'
-	classVariableNames:''
-	poolDictionaries:''
-	privateIn:NewSystemBrowser::OwnershipGraph
+        instanceVariableNames:'revision author date lineOwnership'
+        classVariableNames:''
+        poolDictionaries:''
+        privateIn:NewSystemBrowser::OwnershipGraph
 !
 
 !NewSystemBrowser class methodsFor:'documentation'!
@@ -20657,9 +20657,7 @@
         classes isEmptyOrNil ifTrue:[
             false
         ] ifFalse:[
-            classes
-                allSatisfy:
-                    [:cls | self hasGitRepositoryFor: cls theNonMetaclass package]
+            classes conform: [:cls | self hasGitRepositoryFor: cls theNonMetaclass package]
         ]
     ]
 
@@ -20674,9 +20672,7 @@
         classes isEmptyOrNil ifTrue:[
             false
         ] ifFalse:[
-            classes
-                allSatisfy:
-                    [:cls | self hasMercurialRepositoryFor: cls theNonMetaclass package]
+            classes conform:[:cls | self hasMercurialRepositoryFor: cls theNonMetaclass package]
         ]
     ]
 
@@ -20691,9 +20687,7 @@
         classes isEmptyOrNil ifTrue:[
             false
         ] ifFalse:[
-            classes
-                allSatisfy:
-                    [:cls | self hasPerforceRepositoryFor: cls theNonMetaclass package]
+            classes conform: [:cls | self hasPerforceRepositoryFor: cls theNonMetaclass package]
         ]
     ]
 
@@ -20705,9 +20699,7 @@
 
     classes := self selectedClassesValue.
     classes size = 0 ifTrue:[^false].
-    ^ classes
-        allSatisfy:
-            [:cls | self hasSubversionRepositoryFor: cls theNonMetaclass package]
+    ^ classes conform: [:cls | self hasSubversionRepositoryFor: cls theNonMetaclass package]
 
     "Modified: / 28-02-2012 / 16:55:03 / cg"
 !
@@ -20720,9 +20712,7 @@
         classes isEmptyOrNil ifTrue:[
             false
         ] ifFalse:[
-            classes
-                allSatisfy:
-                    [:cls | self hasSubversionRepositoryFor: cls theNonMetaclass package]
+            classes conform: [:cls | self hasSubversionRepositoryFor: cls theNonMetaclass package]
         ]
     ]
 
@@ -59038,11 +59028,11 @@
 !NewSystemBrowser class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/Tools__NewSystemBrowser.st,v 1.1974 2013-09-05 11:06:56 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/Tools__NewSystemBrowser.st,v 1.1975 2013-09-05 22:48:24 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libtool/Tools__NewSystemBrowser.st,v 1.1974 2013-09-05 11:06:56 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/Tools__NewSystemBrowser.st,v 1.1975 2013-09-05 22:48:24 cg Exp $'
 !
 
 version_HG
@@ -59051,7 +59041,7 @@
 !
 
 version_SVN
-    ^ '$Id: Tools__NewSystemBrowser.st,v 1.1974 2013-09-05 11:06:56 cg Exp $'
+    ^ '$Id: Tools__NewSystemBrowser.st,v 1.1975 2013-09-05 22:48:24 cg Exp $'
 ! !