#REFACTORING by stefan
authorStefan Vogel <sv@exept.de>
Fri, 17 May 2019 17:00:00 +0200
changeset 366586d311ea68fd
parent 3664 0d01da886d5a
child 3666 7ec8466f4f67
#REFACTORING by stefan
Sanitize BlockValues

class: MethodFinderWindow
changed:
#arg1BoxVisible
#arg2BoxVisible
#arg3BoxVisible
#arg4BoxVisible
MethodFinderWindow.st
     1.1 --- a/MethodFinderWindow.st	Fri May 17 16:59:23 2019 +0200
     1.2 +++ b/MethodFinderWindow.st	Fri May 17 17:00:00 2019 +0200
     1.3 @@ -1252,10 +1252,12 @@
     1.4  
     1.5      arg1BoxVisible isNil ifTrue:[
     1.6          arg1BoxVisible := BlockValue
     1.7 -                              with:[:vh | vh value >= 2 ]
     1.8 +                              with:[:vh | vh >= 2 ]
     1.9                                argument:(self argCountHolder)
    1.10      ].
    1.11      ^ arg1BoxVisible.
    1.12 +
    1.13 +    "Modified: / 17-05-2019 / 16:16:59 / Stefan Vogel"
    1.14  !
    1.15  
    1.16  arg2BoxVisible
    1.17 @@ -1264,10 +1266,12 @@
    1.18  
    1.19      arg2BoxVisible isNil ifTrue:[
    1.20          arg2BoxVisible := BlockValue
    1.21 -                              with:[:vh | vh value >= 3 ]
    1.22 +                              with:[:vh | vh >= 3 ]
    1.23                                argument:(self argCountHolder)
    1.24      ].
    1.25      ^ arg2BoxVisible.
    1.26 +
    1.27 +    "Modified: / 17-05-2019 / 16:16:54 / Stefan Vogel"
    1.28  !
    1.29  
    1.30  arg3BoxVisible
    1.31 @@ -1276,10 +1280,12 @@
    1.32  
    1.33      arg3BoxVisible isNil ifTrue:[
    1.34          arg3BoxVisible := BlockValue
    1.35 -                              with:[:vh | vh value >= 4 ]
    1.36 +                              with:[:vh | vh >= 4 ]
    1.37                                argument:(self argCountHolder)
    1.38      ].
    1.39      ^ arg3BoxVisible.
    1.40 +
    1.41 +    "Modified: / 17-05-2019 / 16:16:48 / Stefan Vogel"
    1.42  !
    1.43  
    1.44  arg4BoxVisible
    1.45 @@ -1288,10 +1294,12 @@
    1.46  
    1.47      arg4BoxVisible isNil ifTrue:[
    1.48          arg4BoxVisible := BlockValue
    1.49 -                              with:[:vh | vh value >= 5 ]
    1.50 +                              with:[:vh | vh >= 5 ]
    1.51                                argument:(self argCountHolder)
    1.52      ].
    1.53      ^ arg4BoxVisible.
    1.54 +
    1.55 +    "Modified: / 17-05-2019 / 16:16:43 / Stefan Vogel"
    1.56  !
    1.57  
    1.58  argCountHolder