Hi,
I'm attaching a changeset with the "Close All Windows" menu item. I did it
sending privateDelete to the windows, and I'm not sure if that's right,
hehe. But it works and I put it where every other window menu item is.
I would like someone to test it. Bah, Mariano already did it, but if
someone else can I will be grateful:).
Is there an open issue for this? I didn't find it. If there's not I can
create it.
Cheers,
Guille
On Thu, Mar 25, 2010 at 2:58 PM, Stéphane Ducasse <[email protected]
> wrote:
> +1
>
> On Mar 25, 2010, at 6:28 PM, Oscar Nierstrasz wrote:
>
> >
> > "Panic" does not suggest to me the actual intent.
> >
> > Some random ideas:
> > - "close all"
> > - "nuke"
> > - "reset"
> > - "clear"
> > - "wipe"
> > - "zap"
> > - "tabula rasa"
> > ...
> >
> > - on
> >
> >
> > On Mar 24, 2010, at 22:23, Mariano Martinez Peck wrote:
> >
> >> I am not sure if Panic is the best name. Do you have better ideas?
> >
> >
> > _______________________________________________
> > Pharo-project mailing list
> > [email protected]
> > http://lists.gforge.inria.fr/cgi-bin/mailman/listinfo/pharo-project
>
>
> _______________________________________________
> Pharo-project mailing list
> [email protected]
> http://lists.gforge.inria.fr/cgi-bin/mailman/listinfo/pharo-project
>
'From Pharo-1.1-11367-Beta of ''19 October 2009'' [Latest update: #11367] on 21
June 2010 at 2:00:35 pm'!
!PasteUpMorph methodsFor: '*morphic-windows' stamp: 'GuillermoPolito 6/21/2010
13:59'!
closeAllWindows
(self confirm: 'Do you really want to close all windows?' translated)
ifFalse: [^ self].
(self windowsSatisfying: [:w | true ]) do: [:w | w privateDelete].! !
!WorldState class methodsFor: 'world menu items' stamp: 'GuillermoPolito
6/21/2010 13:41'!
windowsOn: aBuilder
<worldMenu>
(aBuilder item: #Windows)
order: 2.0;
icon: MenuIcons smallWindowIcon;
with: [
(aBuilder item: # 'Collapse all windows')
action: [World collapseAll];
help: 'Reduce all open windows to collapsed
forms that only show titles' translated.
(aBuilder item: # 'Expand all windows')
action: [World expandAll];
help: 'Expand all collapsed windows back to
their expanded forms' translated.
(aBuilder item: # 'Close top window (w)')
action: [SystemWindow closeTopWindow];
help: 'Close the topmost window if possible'
translated.
(aBuilder item: # 'Send top window to back (\)')
action: [SystemWindow sendTopWindowToBack];
help: 'Make the topmost window become the
backmost one, and activate the window just beneath it.' translated.
(aBuilder item: # 'Move windows onscreen')
action: [World bringWindowsFullOnscreen];
help: 'Make all windows fully visible on the
screen' translated.
(aBuilder item: # 'Delete unchanged windows')
action: [World closeUnchangedWindows];
help: 'Deletes all windows that do not have
unsaved text edits.' translated.
(aBuilder item: # 'Close all windows')
action: [World closeAllWindows];
help: 'Closes all windows.' translated].! !
_______________________________________________
Pharo-project mailing list
[email protected]
http://lists.gforge.inria.fr/cgi-bin/mailman/listinfo/pharo-project
