diff --git a/ide/main.pp b/ide/main.pp
index d5a3db174d..e47b63665c 100644
--- a/ide/main.pp
+++ b/ide/main.pp
@@ -8493,7 +8493,9 @@ begin
           Result:=mrAbort;
           exit;
         end;
-      mrCancel:exit;
+      mrNo:
+    else // mrCancel, mrAbort, mrNoToAll ...
+      exit(mrCancel);
     end;
   end;
   {$IFDEF IDE_VERBOSE}