Index: src/filesources/filesystem/ufilesystemsetfilepropertyoperation.pas
===================================================================
--- src/filesources/filesystem/ufilesystemsetfilepropertyoperation.pas	(revision 7605)
+++ src/filesources/filesystem/ufilesystemsetfilepropertyoperation.pas	(working copy)
@@ -306,7 +306,7 @@
       sQuestion:= FileExistsMessage(NewName, aFile.FullPath, aFile.Size, aFile.ModificationTime);
       Result := AskQuestion(sQuestion, '',
                   [fsourOverwrite, fsourSkip, fsourAbort, fsourOverwriteAll,
-                   fsourSkipAll],fsourOverwrite, fsourSkip);
+                   fsourSkipAll], fsourOverwrite, fsourAbort);
       case Result of
       fsourOverwriteAll:
         begin
