--- a/Tools__NewSystemBrowser.st Tue Nov 15 17:08:06 2016 +0100
+++ b/Tools__NewSystemBrowser.st Tue Nov 15 17:09:20 2016 +0100
@@ -1,3 +1,5 @@
+"{ Encoding: utf8 }"
+
"
COPYRIGHT (c) 2000 by eXept Software AG
All Rights Reserved
@@ -47065,7 +47067,7 @@
self activityNotification:nil.
browser := (UserPreferences current changeSetBrowserClass) openOn:previousMethods.
- browser window label:(resources string:'Revisions of %1 » %2' with:mclass name with:mselector).
+ browser window label:(resources string:'Revisions of %1 » %2' with:mclass name with:mselector).
browser readOnly:true.
].
@@ -51658,7 +51660,7 @@
label:[:chg |
|lbl|
"/ lbl := chg printString
- lbl := (chg className ? '???') , ' » ' , (chg selector ? '???') allBold.
+ lbl := (chg className ? '???') , ' » ' , (chg selector ? '???') allBold.
(chg isMethodChange and:[chg changeMethod isNil]) ifTrue:[
lbl := lbl asText allStrikedOut,' ','(removed)' allItalic.
].
@@ -58740,13 +58742,15 @@
navigationState realModifiedState == true ifTrue:[
l := l , (resources string:' [modified]')
] ifFalse:[
- (buffers contains:[:someNavigationState | someNavigationState realModifiedState == true]) ifTrue:[
- l := l , (resources string:' [modified buffer]')
+ buffers notEmptyOrNil ifTrue:[
+ (buffers contains:[:someNavigationState | someNavigationState realModifiedState == true]) ifTrue:[
+ l := l , (resources string:' [modified buffer]')
+ ].
].
].
window label:l string; iconLabel:il string.
- "Modified: / 15-11-2016 / 17:07:56 / cg"
+ "Modified: / 15-11-2016 / 17:08:55 / cg"
!
replaceSourceCodeManagerPlaceholderWith: manager in: menu