#REFACTORING by cg
authorClaus Gittinger <cg@exept.de>
Mon, 15 Oct 2018 13:58:49 +0200
changeset 18478 e88642b2a230
parent 18477 1204c7d7118f
child 18479 7ad0ebf923e2
#REFACTORING by cg class: AbstractFileBrowser class removed: #classResources
AbstractFileBrowser.st
--- a/AbstractFileBrowser.st	Mon Oct 15 09:04:18 2018 +0200
+++ b/AbstractFileBrowser.st	Mon Oct 15 13:58:49 2018 +0200
@@ -1,5 +1,3 @@
-"{ Encoding: utf8 }"
-
 "
  COPYRIGHT (c) 2002 by eXept Software AG
               All Rights Reserved
@@ -2940,12 +2938,6 @@
     ^ firstPre asFilename
 ! !
 
-!AbstractFileBrowser class methodsFor:'resources'!
-
-classResources
-    ^ FileBrowser classResources
-! !
-
 !AbstractFileBrowser class methodsFor:'utilities - dump'!
 
 contentsOfBytesAsDump:data base:numberBase numberOfAddressDigits:addrDigits addressStart:virtualStart characterEncoding:characterEncodingSymbol
@@ -3019,7 +3011,7 @@
                                     "/ are perfect here, but usually not available in the font
                                     "/ and we have currently no way of knowing if they are...
                                     "/ (could let the font draw into a bitmap and check if there is something...)
-                                    "/ For now, write a dot.·
+                                    "/ For now, write a dot.·
                                     "/ charPrinted := (Character value:(byte + 16r2400))
                                 ].
                             ].
@@ -8803,7 +8795,7 @@
             ] ifFalse:[sig == HaltInterrupt ifTrue:[ |sender|
                 label := msg := 'Breakpoint/Halt in fileIn'.
                 sender := ex suspendedContext.
-                msg := msg , ('\\in %1 » %2' bindWith:(sender receiver class name) with:(sender sender selector))
+                msg := msg , ('\\in %1 » %2' bindWith:(sender receiver class name) with:(sender sender selector))
             ] ifFalse:[
                 label := 'Error in fileIn'.
                 msg := 'error in fileIn: %1'