diff -r e3e40eabdebc -r ecd5e5b0ef88 DialogBox.st --- a/DialogBox.st Wed Sep 14 07:10:45 2016 +0200 +++ b/DialogBox.st Mon Sep 19 17:28:34 2016 +0200 @@ -1,3 +1,5 @@ +"{ Encoding: utf8 }" + " COPYRIGHT (c) 1994 by Claus Gittinger All Rights Reserved @@ -3527,7 +3529,9 @@ ifFail:nil pattern:nil fromDirectory:directoryOrNil - whenBoxCreatedEvaluate:[:box | (dialog := box) appendButtonVisibleHolder value:appendActionOrNil notNil]. + whenBoxCreatedEvaluate:[:box | + (dialog := box) appendButtonVisibleHolder value:appendActionOrNil notNil + ]. doAppend := dialog appendWasPressed ] ifFalse:[ @@ -3547,7 +3551,7 @@ (doAppend ifTrue:[appendActionOrNil] ifFalse:[action]) value:fileName ]. - ^ self. + ^ fileName. " Dialog