diff --git a/repository/Grafoscopio/GrafoscopioGUI.class.st b/repository/Grafoscopio/GrafoscopioGUI.class.st index dad69a0..308acc2 100644 --- a/repository/Grafoscopio/GrafoscopioGUI.class.st +++ b/repository/Grafoscopio/GrafoscopioGUI.class.st @@ -129,7 +129,9 @@ GrafoscopioGUI class >> dockingBar: anObject [ { #category : #'graphical interface' } GrafoscopioGUI class >> downloadingFrom: downloadUrl withMessage: aString into: location [ - + | fileName | + fileName := (downloadUrl splitOn: $/) last. + (location / fileName) exists ifTrue: [ (location / fileName) ensureDelete ]. [: bar | bar title: aString. [ZnClient new