*** empty log message ***
authorClaus Gittinger <cg@exept.de>
Wed, 22 Nov 2006 12:10:15 +0100
changeset 7533 0c8f7d76cd18
parent 7532 835f10dd0df3
child 7534 3d9f3eb3ed65
*** empty log message ***
AbstractFileBrowser.st
--- a/AbstractFileBrowser.st	Mon Nov 20 22:43:16 2006 +0100
+++ b/AbstractFileBrowser.st	Wed Nov 22 12:10:15 2006 +0100
@@ -5936,7 +5936,7 @@
         ] ifFalse:[sig == HaltInterrupt ifTrue:[ |sender|
             label := msg := 'Breakpoint/Halt in fileIn'.
             sender := ex suspendedContext.
-            msg := msg , '\\in ' , sender receiver class name , '>>' , sender selector
+            msg := msg , '\\in ' , sender receiver class name , '>>' , sender sender selector
         ] ifFalse:[
             label := 'Error in fileIn'.
             msg := 'error in fileIn: %1'
@@ -5997,7 +5997,7 @@
         ex reject
     ]
 
-    "Modified: / 28-08-2006 / 20:10:15 / cg"
+    "Modified: / 21-11-2006 / 15:53:03 / cg"
 !
 
 splitFile:infile intoPiecesOfSize:kiloBytes
@@ -7119,5 +7119,5 @@
 !AbstractFileBrowser class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/AbstractFileBrowser.st,v 1.345 2006-11-09 07:31:41 ca Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/AbstractFileBrowser.st,v 1.346 2006-11-22 11:10:15 cg Exp $'
 ! !