--- a/Tools__NewSystemBrowser.st Fri Jun 28 09:06:08 2019 +0200
+++ b/Tools__NewSystemBrowser.st Fri Jun 28 09:22:00 2019 +0200
@@ -27388,7 +27388,7 @@
"/ do not use self class new here - to avoid using obsolete classes instances
"/ while working on the browser itself ...
- browser := (Smalltalk at:self class name) new.
+ browser := (Smalltalk at:self className) new.
browser environment: self environment.
browser allButOpen.
browser setupNavigationStateFrom:navigationState.
@@ -27406,6 +27406,7 @@
"Modified: / 08-08-2010 / 15:19:13 / cg"
"Modified: / 27-04-2014 / 11:07:08 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+ "Modified: / 28-06-2019 / 09:20:37 / Claus Gittinger"
!
browseMenuDeprecatedMethods
@@ -29357,8 +29358,10 @@
"action to be added ..."
- Transcript showCR:self class name, ': action for #categoryMenuFileOutCypressAs ...'.
+ Transcript showCR:self className, ': action for #categoryMenuFileOutCypressAs ...'.
Dialog warn:'unimplemented function'.
+
+ "Modified: / 28-06-2019 / 09:20:42 / Claus Gittinger"
!
categoryMenuFileOutEachBinaryIn