[cid:c3f07aa2-b475-4b82-8ab5-c0b3653ca83a]

[cid:8bcdba94-8785-4282-917f-fd58559cf91a]


Best,

Christoph

________________________________
Von: Squeak-dev <squeak-dev-bounces at lists.squeakfoundation.org> im Auftrag von commits at source.squeak.org <commits at source.squeak.org>
Gesendet: Freitag, 10. Juni 2022 19:52:36
An: squeak-dev at lists.squeakfoundation.org
Betreff: [squeak-dev] The Inbox: Morphic-ct.2009.mcz

A new version of Morphic was added to project The Inbox:
http://source.squeak.org/inbox/Morphic-ct.2009.mcz

==================== Summary ====================

Name: Morphic-ct.2009
Author: ct
Time: 10 June 2022, 7:52:30.248586 pm
UUID: 00155f55-d7b7-1d4c-9965-d1a8ff872513
Ancestors: Morphic-ct.2006

Proposal: When closing all windows (unsafely), only ask the user about unsaved changes if there are actually any. Also provide an option from that dialog to only close windows without changes.

Improves multilingual support as well.

Revision: Improve user strings. Sorry for the noise.

=============== Diff against Morphic-ct.2006 ===============

Item was changed:
  ----- Method: TheWorldMainDockingBar>>closeAllWindowsButWorkspaces (in category 'submenu - windows') -----
  closeAllWindowsButWorkspaces

         (UserDialogBoxMorph
+                confirm: 'There might be unsaved changes.\Do you really want to close all windows\that are no workspaces?' withCRs translated
+                title: 'Only keep workspaces' translated) ifTrue: [
-                confirm: 'There might be unsaved changes.\Do you really want to close all windows\that are no workspaces?' withCRs
-                title: 'Only keep workspaces') ifTrue: [
                         self allVisibleWindows
                                 reject: [:each | each model isKindOf: Workspace]
                                 thenDo: [:each | [each delete] valueSupplyingAnswer: true]].!

Item was changed:
  ----- Method: TheWorldMainDockingBar>>closeAllWindowsUnsafe (in category 'submenu - windows') -----
  closeAllWindowsUnsafe

+        (self allVisibleWindows allSatisfy: [:each |
+                each model canDiscardEdits])
+                        ifFalse:
+                                [(Project uiManager
+                                        chooseOptionFromLabeledValues:
+                                                (OrderedDictionary new
+                                                        at: 'Yes, close all windows' translated put: [#proceed];
+                                                        at: 'Close only windows without changes' translated put: [^ self closeAllWindows];
+                                                        at: 'Cancel' put: [^ self];
+                                                        yourself)
+                                        title: 'There are unsaved changes.\Do you really want to close all windows?' withCRs translated)
+                                                value
+                                                        ifNil: [^ self]].
+
+        self allVisibleWindows do: [:each | [each delete] valueSupplyingAnswer: true].!
-        (UserDialogBoxMorph
-                confirm: 'There might be unsaved changes.\Do you really want to close all windows?' withCRs
-                title: 'Close All Windows') ifTrue: [
-                        self allVisibleWindows do: [:each | [each delete] valueSupplyingAnswer: true]].!


-------------- next part --------------
An HTML attachment was scrubbed...
URL: <http://lists.squeakfoundation.org/pipermail/squeak-dev/attachments/20220610/c9b98f29/attachment-0001.html>
-------------- next part --------------
A non-text attachment was scrubbed...
Name: pastedImage.png
Type: image/png
Size: 10887 bytes
Desc: pastedImage.png
URL: <http://lists.squeakfoundation.org/pipermail/squeak-dev/attachments/20220610/c9b98f29/attachment-0002.png>
-------------- next part --------------
A non-text attachment was scrubbed...
Name: pastedImage.png
Type: image/png
Size: 50305 bytes
Desc: pastedImage.png
URL: <http://lists.squeakfoundation.org/pipermail/squeak-dev/attachments/20220610/c9b98f29/attachment-0003.png>