# HG changeset patch # User Claus Gittinger # Date 1582647746 -3600 # Node ID e255e70254ec6a42b0b340c1dd1edb0a6211e139 # Parent 18d257afba510d86185d6c452202930f4b32b743 #REFACTORING by cg class: FileApplicationNoteBook::ArchiveViewApplication changed: #extractSelectionTo:askForExtractOptions: elimnate withCRs diff -r 18d257afba51 -r e255e70254ec FileApplicationNoteBook.st --- a/FileApplicationNoteBook.st Tue Feb 25 13:40:41 2020 +0100 +++ b/FileApplicationNoteBook.st Tue Feb 25 17:22:26 2020 +0100 @@ -1,3 +1,5 @@ +"{ Encoding: utf8 }" + " COPYRIGHT (c) 2002 by eXept Software AG All Rights Reserved @@ -2530,7 +2532,7 @@ askForExtractOptionsBoolean ifTrue:[ index := extractFiles findFirst:[: el | el hasDirectoryPart]. index ~= 0 ifTrue:[ - extractWithDirectoryPart := (Dialog confirmWithCancel:'Extract with directory part ?\\(I.e. create empty directories as required to preserve relative path)' withCRs default:true). + extractWithDirectoryPart := (Dialog confirmWithCancel:c'Extract with directory part ?\n\n(I.e. create empty directories as required to preserve relative path)' default:true). extractWithDirectoryPart isNil ifTrue:[^ false]. ]. ].