class: FileBrowser
authorClaus Gittinger <cg@exept.de>
Fri, 19 Apr 2013 11:36:55 +0200
changeset 12685 b1a3271334ad
parent 12684 cc8a225600bd
child 12686 0920976ce7ef
class: FileBrowser changed: #fileFileIn:lazy: use #creator instead of #signal (avoid semantic conflict with ANSI, where signal means: raise)
FileBrowser.st
--- a/FileBrowser.st	Fri Apr 19 11:36:40 2013 +0200
+++ b/FileBrowser.st	Fri Apr 19 11:36:55 2013 +0200
@@ -2366,7 +2366,7 @@
         |sig msg label labels values action proceedValue isRedef|
 
         isRedef := false.
-        sig := ex signal.
+        sig := ex creator.
         sig == Class methodRedefinitionNotification ifTrue:[
             msg := 'trying to overwrite method:\\    ' , ex oldMethod whoString , '\\in package ''' 
                    , ex oldPackage , ''' with method from package ''' , ex newPackage , ''''.
@@ -7505,10 +7505,10 @@
 !FileBrowser class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/FileBrowser.st,v 1.644 2013-03-02 13:19:21 stefan Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/FileBrowser.st,v 1.645 2013-04-19 09:36:55 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libtool/FileBrowser.st,v 1.644 2013-03-02 13:19:21 stefan Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/FileBrowser.st,v 1.645 2013-04-19 09:36:55 cg Exp $'
 ! !