#BUGFIX by sr
authorsr
Fri, 02 Sep 2016 13:48:51 +0200
changeset 16825 b5bc034a38d7
parent 16824 165814de4c38
child 16826 db04dc4aac2d
#BUGFIX by sr class: AbstractFileBrowser changed: #getExecutionBlockForCommand:inDirectory:
AbstractFileBrowser.st
--- a/AbstractFileBrowser.st	Thu Sep 01 19:46:28 2016 +0200
+++ b/AbstractFileBrowser.st	Fri Sep 02 13:48:51 2016 +0200
@@ -1,3 +1,5 @@
+"{ Encoding: utf8 }"
+
 "
  COPYRIGHT (c) 2002 by eXept Software AG
               All Rights Reserved
@@ -4384,6 +4386,7 @@
                 errorTo:stream 
                 inDirectory:dir
                 lineWise:true
+                showWindow:false
                 onError:[:status| false].
         ]
       ].
@@ -8372,7 +8375,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'