changed: #updatePackageInfoForMethod:
authorvrany
Thu, 01 Dec 2011 14:42:52 +0100
changeset 10942 fe91bd032e49
parent 10941 3ff94636780d
child 10943 39d815d28b9d
changed: #updatePackageInfoForMethod:
Tools__NewSystemBrowser.st
--- a/Tools__NewSystemBrowser.st	Thu Dec 01 11:53:42 2011 +0100
+++ b/Tools__NewSystemBrowser.st	Thu Dec 01 14:42:52 2011 +0100
@@ -16783,6 +16783,7 @@
     "Created: / 24.2.2000 / 23:28:06 / cg"
 ! !
 
+
 !NewSystemBrowser methodsFor:'aspects-organization'!
 
 categoryMenuVisible
@@ -20090,6 +20091,7 @@
     ^ UserPreferences current useSearchBarInBrowser or:[self codeView searchBarActionBlock notNil]
 ! !
 
+
 !NewSystemBrowser methodsFor:'change & update'!
 
 categorySelectionChanged
@@ -42422,6 +42424,7 @@
     "Modified: / 25-06-2010 / 10:08:16 / Jan Vrany <jan.vrany@fit.cvut.cz>"
 ! !
 
+
 !NewSystemBrowser methodsFor:'menu actions-variables'!
 
 browseVarRefsOrModsWithTitle:browserTitle boxTitle:boxTitle variables:varType access:accessType all:browseAll
@@ -47194,7 +47197,7 @@
             ].
             info2 := info2,sourceCodeManagerInfo,revision,extensionOrNot,']'.
         ].
-        info := info,info2
+        info2 notNil ifTrue:[info := info,info2].
     ].
 
     mClass notNil ifTrue:[
@@ -47202,8 +47205,8 @@
     ].
     navigationState packageLabelHolder value:info
 
-    "Modified: / 03-10-2011 / 15:42:21 / Jan Vrany <jan.vrany@fit.cvut.cz>"
     "Modified (format): / 25-11-2011 / 14:48:14 / cg"
+    "Modified: / 01-12-2011 / 14:26:59 / Jan Vrany <jan.vrany@fit.cvut.cz>"
 ! !
 
 !NewSystemBrowser methodsFor:'private-dialogs'!
@@ -49366,6 +49369,7 @@
     ^ navigationState projectListApplication
 ! !
 
+
 !NewSystemBrowser methodsFor:'private-history'!
 
 lastSearchPatterns
@@ -54516,11 +54520,11 @@
 !NewSystemBrowser class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/Tools__NewSystemBrowser.st,v 1.1661 2011-11-29 14:05:57 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/Tools__NewSystemBrowser.st,v 1.1662 2011-12-01 13:42:52 vrany Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libtool/Tools__NewSystemBrowser.st,v 1.1661 2011-11-29 14:05:57 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/Tools__NewSystemBrowser.st,v 1.1662 2011-12-01 13:42:52 vrany Exp $'
 !
 
 version_SVN