[Cuis-dev] [IMPROV] Accept for Workspaces

[Juan Vuletich]

On 3/16/2023 8:45 AM, Gerald Klix via Cuis-dev wrote:
> Hi all, Hi Juan,
>
> I found it a bit annoying ever since I used Cuis, that I can't accept 
> the contents of a workspace. (This even worked in Smalltalk/V for 
> MS-DOS back in 1986).
>
> Please find a simple three method change-set attached,
> that fixes this problem.
>
> If you don't like the "forceSaveContents" stuff you
> can define TextModel>>#acceptContentsFrom: like this:
>
> acceptContentsFrom: aTextModelMorph
>
>     aTextModelMorph owningWindow ifNotNil: [ :ow |
>         ow hasSaveAs ifTrue: [ ow saveContents ] ]
>
> and make it use the existing saveAs logic in SystemWindow.
>
>
> HTH and Best Regards,
>
> Gerald

Nice! It is now at GitHub.

Cheers,

-- 
Juan Vuletich
cuis.st
github.com/jvuletich
researchgate.net/profile/Juan-Vuletich
independent.academia.edu/JuanVuletich
patents.justia.com/inventor/juan-manuel-vuletich
linkedin.com/in/juan-vuletich-75611b3
twitter.com/JuanVuletich