# HG changeset patch # User Claus Gittinger # Date 1583527164 -3600 # Node ID a696d5bd880241bfc7eea326b7e6fee9208d0c1c # Parent 58687d2b8474715ecb8850ab62a7a920ccbba223 #REFACTORING by cg class: DialogBox class changed: #information:title: #informationText:title: #informationText:title:windowTitle: #warn:title: diff -r 58687d2b8474 -r a696d5bd8802 DialogBox.st --- a/DialogBox.st Fri Mar 06 21:38:50 2020 +0100 +++ b/DialogBox.st Fri Mar 06 21:39:24 2020 +0100 @@ -1326,7 +1326,7 @@ |currentScreen| -"/ UserPreferences current suppressDialogBoxForWarnings ifTrue:[^ self]. + UserPreferences current suppressDialogBoxForWarnings ifTrue:[^ self]. ((currentScreen := Screen current) notNil and:[currentScreen nativeDialogs]) ifTrue:[ ^ currentScreen @@ -1373,7 +1373,7 @@ |dialog textHolder| -"/ UserPreferences current suppressDialogBoxForWarnings ifTrue:[^ self]. + UserPreferences current suppressDialogBoxForWarnings ifTrue:[^ self]. textHolder := ValueHolder new. dialog := Dialog @@ -1397,7 +1397,7 @@ |dialog textHolder| -"/ UserPreferences current suppressDialogBoxForWarnings ifTrue:[^ self]. + UserPreferences current suppressDialogBoxForWarnings ifTrue:[^ self]. textHolder := ValueHolder new. dialog := Dialog @@ -1446,7 +1446,7 @@ |currentScreen| -"/ UserPreferences current suppressDialogBoxForWarnings ifTrue:[^ self]. + UserPreferences current suppressDialogBoxForWarnings ifTrue:[^ self]. ((currentScreen := Screen current) notNil and:[currentScreen nativeDialogs]) ifTrue:[ ^ currentScreen