Squeak-dev July 2021

squeak-dev@lists.squeakfoundation.org

25 participants
180 discussions

[ANN] Squeak Inbox Talk - bringing squeak-dev into your image
by christoph.thiede＠student.hpi.uni-potsdam.de 19 Jul '21

19 Jul '21

Hi all! :-) I'm very excited to announce a new tool to you today that aims to make the Squeak development cycle a bit easier for all of us. Introducing Squeak Inbox Talk, which allows you as Squeak contributors and maintainers to review and discuss new features for Squeak directly in your image! Installation: Install the latest Trunk updates first. Metacello new baseline: 'SqueakInboxTalk'; repository: 'github://hpi-swa-lab/squeak-inbox-talk:main'; load. After the installation, in the main docking bar, choose "Squeak Inbox Talk" from the Apps menu, click Refresh, and there you go! Alternatively, you can download a ready-to-use image here: https://github.com/hpi-swa-lab/squeak-inbox-talk/releases In [1] you can find the open-source GitHub repository, including a project board and some theoretical background. Your feedback is especially helpful for my research before 2021-07-19 (but still appreciated later very much). Maybe you have already experienced at least one of the following troubles in the past: 1. Tedious navigation on the list: Where has this patch gone? Can someone remember where we were discussing this funky thing recently? 2. High entry barrier for new contributors: You need to sign up on the mailing list to follow discussions. 3. Hard review process: Notifications and discussions appear in your email client, but if you want to check out some code, you will switch to your image, of course. In the last months, I have been trying to solve these and other issues. Now I'm inviting you to figure out whether I have been successful! Squeak Inbox Talk allows you to interact with all relevant artifacts right in Squeak, including emails as well as Monticello contributions. It comes with a free-text search and several powerful filters for aspects such as packages, review state of a contribution, and your personal involvement. These filters should make it easier to survey certain domains, gain a better understanding of the connection between inbox versions, or keep track of your own proposals. Please give it a try and return feedback! As one possible starting point, you could search for "terminate" to recapitulate Jaromir's recent efforts on Process. I had the great opportunity to run this project in the course of a seminar at HPI, and the luck to be guided by Marcel while doing so. In a few weeks, I will present the project internally, and your thoughts and feedback will of course be very helpful for my evaluation. Needless to say, I'm also looking forward to making the tool even more convenient for you. :-) Thank you so much in advance! Best, Christoph --- APPENDIX: How does it work? Basically, Squeak Inbox Talk is implemented by reusing and assembling together the following existing solutions: Squeak History [2], a project originally developed by Marcel (mt) that scrapes and processes all mailing list conversations from the pipermail archives [3]; the SMTPClient in Squeak [5] for sending messages; and the Monticello infrastructure, which remains the heart of our development workflow. Optionally, further components such as IMAPClient [4] might follow later. On top of this, Squeak Inbox Talk adds a convenient layer for exploring and filtering conversations and contributions. [1] https://github.com/hpi-swa-lab/squeak-inbox-talk [2] https://github.com/hpi-swa/squeak-history [3] http://lists.squeakfoundation.org/pipermail/squeak-dev/ [4] https://github.com/hpi-swa-teaching/IMAPClient [5] This mail was sent from Squeak Inbox Talk using the latest version of the SMTPClient. Yeah, it's actually still alive and doing well! =D

7 7

Morphic - wrong extent after adding submorph?
by Bernhard Pieber 19 Jul '21

19 Jul '21

Hi, I would have expected that when I wrap a morph in another morph, which has resizing set to #shrinkWrap, that the wrapping morph should have the same extent as the wrapped morph. However, this seems not to be the case: | stringMorph rowMorph | stringMorph := 'Morphic is great' asMorph. rowMorph := Morph new color: Color transparent; layoutPolicy: TableLayout new; listDirection: #leftToRight; hResizing: #shrinkWrap; vResizing: #shrinkWrap; yourself. rowMorph addMorph: stringMorph. {stringMorph extent. rowMorph extent}. {97@14 . 50@40} I wonder if this is a bug? Or does one have to send a special message to a morph after adding submorphs to it? Cheers, Bernhard

2 1

The Inbox: Kernel-ct.1408.mcz
by commits＠source.squeak.org 17 Jul '21

17 Jul '21

A new version of Kernel was added to project The Inbox: http://source.squeak.org/inbox/Kernel-ct.1408.mcz ==================== Summary ==================== Name: Kernel-ct.1408 Author: ct Time: 17 July 2021, 8:21:02.006197 pm UUID: 0b59b2d7-2dfe-6640-bc29-63e35699bc53 Ancestors: Kernel-mt.1406 Proposal: Show nested exception in the description of BrokenPromise. =============== Diff against Kernel-mt.1406 =============== Item was changed: + ----- Method: BrokenPromise>>defaultAction (in category 'priv handling') ----- - ----- Method: BrokenPromise>>defaultAction (in category 'as yet unclassified') ----- defaultAction self messageText: 'Promise was rejected'. ^super defaultAction! Item was added: + ----- Method: BrokenPromise>>description (in category 'accessing') ----- + description + + ^ String streamContents: [:stream | + stream nextPutAll: super description. + self exception ifNotNil: [:ex | + stream + nextPutAll: ': '; + nextPutAll: ex description]]! Item was added: + ----- Method: BrokenPromise>>exception (in category 'accessing') ----- + exception + + ^ promise ifNotNil: [promise error]! Item was changed: + ----- Method: BrokenPromise>>isResumable (in category 'priv handling') ----- - ----- Method: BrokenPromise>>isResumable (in category 'as yet unclassified') ----- isResumable ^ true! Item was changed: + ----- Method: BrokenPromise>>promise (in category 'accessing') ----- - ----- Method: BrokenPromise>>promise (in category 'as yet unclassified') ----- promise ^ promise! Item was changed: + ----- Method: BrokenPromise>>promise: (in category 'accessing') ----- - ----- Method: BrokenPromise>>promise: (in category 'as yet unclassified') ----- promise: aPromise promise := aPromise!

1 0

Documenting the system
by gettimothy 17 Jul '21

17 Jul '21

How do we document Squeak? There are class comments (mostly), there are books and papers, but when we want to develop a detailed spec about something, what is the best way to do that? Requirements: 1. We need something that is easy enough for people to contribute. 2. Something that is easily maintained and modified 3. Something that is collaborative 4. Something that is easily discoverable 5. Something that is not easily ignored 6. Something that can be tested! 7. Something that can be versioned There are existing options like our swiki and github readme, or github pages. There are third party tools available (https://readthedocs.org/) or (https://www.sphinx-doc.org/en/master/) which may be good but raise the bar for contributions. Maybe a loadable package that includes searchable documentation and tests. An Active Essay? (https://www.playfulinvention.com/emergence/active-essay.html). I forgot to mention that this same Pillar/Git stuff can be served up via Seaside with a transform into xHTML too. Now...getting Seaside->Git via a form will be problematic, but that is for another day.

1 0

Documenting the system
by gettimothy 17 Jul '21

17 Jul '21

Hi Ron How do we document Squeak? There are class comments (mostly), there are books and papers, but when we want to develop a detailed spec about something, what is the best way to do that? Requirements: 1. We need something that is easy enough for people to contribute. 2. Something that is easily maintained and modified 3. Something that is collaborative 4. Something that is easily discoverable 5. Something that is not easily ignored 6. Something that can be tested! 7. Something that can be versioned There are existing options like our swiki and github readme, or github pages. There are third party tools available (https://readthedocs.org/) or (https://www.sphinx-doc.org/en/master/) which may be good but raise the bar for contributions. Maybe a loadable package that includes searchable documentation and tests. An Active Essay? (https://www.playfulinvention.com/emergence/active-essay.html). How do we, as a community, want to do docs? Thanks, Ron Teitelbaum While I am currently very busy with other things, I will be returning to work on this problem. Pharo has a git based thing named Pillar which is written in a variant of Markdown. This covers 1,2,3,4 and 7 in your post. As Tim remarked, the HelpBrowser is fundamental to squeak also Monticello is fundamental to squeak. So, my idea is to "round robin" the Pillar git stuff into Help browser and from there it can be put into monticello. Also the monticello to help browser to git can be accomplished in the reverse. My plan it to use the XTreams Parsing and develop a PEG to handle the git to HelpBrowser conversion. I have a major hurdle in my current XTreams Parsing project to overcome--this is several months out before I turn to this project. Another benefit imho is that I can use EMACS and the abundant editing tools available specifically for editing books and such; I find that composing in the HelpBrowser is a chore. I have another idle project in mind where I make documentation available via the workspace with a framework I call "Doc" that provides "all" available documentation on a query. However, I think the "round robin/Pillar" part needs to be tackled first. cheers, tty

1 0

UK Smalltalk User Group Meeting - Wednesday 28th July 2021
by Giovanni Corriga 16 Jul '21

16 Jul '21

The next meeting of the UK Smalltalk User Group will be on Wednesday, July 30th. Russell Allen will talk to us about Self ( https://selflanguage.org/ ). Dating back to the late 1980s, Self is a prototype based programming language and environment in the broader Smalltalk family. Although Self has always been a niche research system, its influence can still be seen in areas as diverse as the fast VMs of Java and Javascript, in the prototype semantics of Javascript, and in the Morphic user interface used by Squeak, Pharo and Cuis. Russell Allen ( https://twitter.com/russell_allen_ ) has a background in law and computers and first came across Self in the late 1990s. Around 2008 he helped get Self running on Linux x86, set up the Self website and GitHub account, and for the last decade or so he has been helping keep Self as a project alive. In this talk, Russell will demonstrate Self as a running system, including the object semantics, language, and the multi-user Morphic development environment. he’ll talk about the current status of the project and the challenges it faces for the future. Given the current COVID-19 restrictions, this will be an online meeting from home. Please note that the meeting will start later than usual, to accomodate the speaker who will connect from Australia. If you'd like to join us, please sign up in advance on the meeting's Meetup page ( https://www.meetup.com/UKSTUG/events/cbklbrycckblc/ ) to receive the meeting details. Don’t forget to bring your laptop and drinks!

1 0

Re: [squeak-dev] [ANN] Squeak Inbox Talk - bringing squeak-dev into your image
by stes＠PANDORA.BE 15 Jul '21

15 Jul '21

-----BEGIN PGP SIGNED MESSAGE----- Hash: SHA256 I tested on OpenIndiana and on Solaris 11.3 and I believe this works. Probably it also works on Solaris 11.4 but I didn't try that so far. Metacello new baseline: 'SqueakInboxTalk'; repository: 'github://hpi-swa-lab/squeak-inbox-talk:main'; load. Two remarks: 1) as always you could explain that you first have to run : Installer ensureRecentMetacello. 2) when you click 'Refresh' in InboxTalk, it alerts : There is no archive path set to store data. The following default will be used: <SOMEPATH>/squeak-history/lists Do you want to change that to a custom path now? I think this question should be changed or its sense should be reversed. Seems more intuitive to ask "Do you accept the default ?" and answer "Yes". Anyway this seems to work for me based on a quick test ... Nice work. David Stes -----BEGIN PGP SIGNATURE----- Version: GnuPG v2 iQEcBAEBCAAGBQJg7XIMAAoJENdFDkXGicizcgcH/264pQEl60w9VukHMKHUC5Oy CcZyogX9BiUgrhXJAMW2erY6M7goaKtPYWrp5lX/TkaBxHvwZIhc2AvZUCl3W+Ln nQXVksxgFttH1xKZB5sGKN8KeyttEvn2KfP0peyVONsPjEqL/pbKDVDr8JuDaNVx NGPbf9KsLUyAkjKmtuD+sg9FNSI43LGh0odhOd9VArxFReub7tIGLH8VXihq/lj2 M7KUg7+ByMo1/VsV8nqHwvYHXKhdRq+Jy5PpJlmhU7jIHU/doFV/8+3CSmx+igIa dB0I+H/MhgTOWjseHeg2GTfC61PNWK6+VE5+0DxnEYE/yfnuEcmjEOhHmsHL8P4= =xugj -----END PGP SIGNATURE-----

5 10

The Inbox: System-ct.1241.mcz
by commits＠source.squeak.org 15 Jul '21

15 Jul '21

A new version of System was added to project The Inbox: http://source.squeak.org/inbox/System-ct.1241.mcz ==================== Summary ==================== Name: System-ct.1241 Author: ct Time: 15 July 2021, 1:11:00.628878 pm UUID: c64e0528-5c33-a945-88ad-7789ac59a447 Ancestors: System-mt.1239 MailSender: Allows for empty credentials (username and password). Empty credentials are saved as '' whereas missing credentials are saved as nil. Also improves multilingual support and makes UIManager invocations more idiomatic. Thanks to David Stes for the pointer! Supersedes System-ct.1240. =============== Diff against System-mt.1239 =============== Item was changed: ----- Method: MailSender class>>isUserEmailSet (in category 'testing') ----- isUserEmailSet + ^ UserEmail notNil - ^ UserEmail notNil and: [UserEmail notEmpty] ! Item was changed: ----- Method: MailSender class>>isUserNameSet (in category 'testing') ----- isUserNameSet + ^ UserName notNil - ^ UserName notNil and: [UserName notEmpty] ! Item was changed: ----- Method: MailSender class>>isUserPasswordSet (in category 'testing') ----- isUserPasswordSet + ^ UserPassword notNil - ^ UserPassword notNil and: [UserPassword notEmpty] ! Item was changed: ----- Method: MailSender class>>setSmtpServer (in category 'settings') ----- setSmtpServer "Set the SMTP server used to send outgoing messages via" + | answer | + answer := Project uiManager + request: 'What is your mail server for outgoing mail?' translated + initialAnswer: (SmtpServer ifNil: ['']). + answer ifNotNil: [SmtpServer := answer].! - SmtpServer ifNil: [SmtpServer := '']. - SmtpServer := UIManager default - request: 'What is your mail server for outgoing mail?' - initialAnswer: SmtpServer. - ! Item was changed: ----- Method: MailSender class>>setSmtpServerPort (in category 'settings') ----- setSmtpServerPort "Set the SMTP server port used to send outgoing messages via" + | answer | + answer := Project uiManager + request: 'What is your mail server port for outgoing mail?' translated + initialAnswer: (SmtpServerPort ifNil: [25]) asString. + answer isEmptyOrNil ifTrue: [^ self]. + SmtpServerPort := answer asNumber.! - SmtpServerPort ifNil: [SmtpServerPort := 25]. - SmtpServerPort := (UIManager default - request: 'What is your mail server port for outgoing mail?' - initialAnswer: SmtpServerPort asString) asNumber. - ! Item was changed: ----- Method: MailSender class>>setUserEmail (in category 'settings') ----- setUserEmail "Change the user's email for use in composing messages." + (Project uiManager + request: 'What is your email address?\(This is the address other people will reply to you)' withCRs translated + initialAnswer: (UserEmail ifNil: [''])) - (UIManager default - request: 'What is your email address?\(This is the address other people will reply to you)' withCRs - initialAnswer: (UserEmail ifNil: [UserEmail := ''])) ifNotNil: [:answer | UserEmail := answer]! Item was changed: ----- Method: MailSender class>>setUserName (in category 'settings') ----- setUserName + (Project uiManager + request: 'What is your user name on the SMTP server?' translated + initialAnswer: (UserName ifNil: [''])) - (UIManager default - request: 'What is your user name on the SMTP server?' withCRs - initialAnswer: (UserName ifNil: [UserName := ''])) ifNotNil: [:answer | UserName := answer]! Item was changed: ----- Method: MailSender class>>setUserPassword (in category 'settings') ----- setUserPassword + (Project uiManager + requestPassword: 'What is your server password?' translated) - UserPassword ifNil: [UserPassword := '']. - (UIManager default - requestPassword: 'What is your server passwort?' withCRs) ifNotNil: [:answer | UserPassword := answer]! Item was changed: ----- Method: MailSender class>>smtpServer (in category 'accessing') ----- smtpServer "Answer the server for sending email" self isSmtpServerSet ifFalse: [self setSmtpServer]. + SmtpServer ifNil: [self error: 'no SMTP server specified' translated]. - SmtpServer isEmpty ifTrue: [ self error: 'no SMTP server specified' ]. ^SmtpServer! Item was changed: ----- Method: MailSender class>>smtpServerPort (in category 'accessing') ----- smtpServerPort "Answer the server for sending email" self isSmtpServerPortSet ifFalse: [self setSmtpServerPort]. + SmtpServerPort isNil ifTrue: [self error: 'no SMTP server port specified' translated]. - SmtpServerPort isNil ifTrue: [ self error: 'no SMTP server port specified' ]. ^SmtpServerPort! Item was changed: ----- Method: MailSender class>>userEmail (in category 'accessing') ----- userEmail "Answer the user name to be used for sending out messages." self isUserEmailSet ifFalse: [self setUserEmail]. + UserEmail ifNil: [self error: 'no user email specified' translated]. - UserEmail isEmpty ifTrue: [ self error: 'no user email specified' ]. ^UserEmail! Item was changed: ----- Method: MailSender class>>userName (in category 'accessing') ----- userName "Answer the user name to be used for sending out messages." self isUserNameSet ifFalse: [self setUserName]. + UserName ifNil: [self error: 'no user name specified' translated]. - UserName isEmpty ifTrue: [ self error: 'no user name specified' ]. ^UserName! Item was changed: ----- Method: MailSender class>>userPassword (in category 'accessing') ----- userPassword self isUserPasswordSet ifFalse: [self setUserPassword]. + UserPassword ifNil: [self error: 'no user name specified' translated]. - UserPassword isEmpty ifTrue: [ self error: 'no user name specified' ]. ^ UserPassword! Item was added: + ----- Method: Preferences class>>allowEtoyUserCustomEvents (in category 'standard queries') ----- + allowEtoyUserCustomEvents + ^ self + valueOfFlag: #allowEtoyUserCustomEvents + ifAbsent: [false]!

1 0

vm-display-fbdev
by ken.dickey＠whidbey.com 15 Jul '21

15 Jul '21

Greetings, vm-display-fbdev uses a framebuffer for display and libevdev for keyboard and mouse input. So, no X11 and you have to set up the proper devices. E.g. squeak -vm-display-fbdev -fbdev /dev/fb0 assuming that /dev/input/event? devices are properly set for keyboard and mouse. If you look at https://github.com/OpenSmalltalk/opensmalltalk-vm/tree/Cog/platforms/unix/v… You will see notes on my usage in Armbian Linx on LePotato (AML-S905X-CC) and Alpine Linux on Raspberry Pi 4. It would be good to get this plugin up and tested on other Linux variants and platforms. Let me know... Cheers, -KenD

1 0

The Inbox: System-ct.1240.mcz
by commits＠source.squeak.org 15 Jul '21

15 Jul '21

A new version of System was added to project The Inbox: http://source.squeak.org/inbox/System-ct.1240.mcz ==================== Summary ==================== Name: System-ct.1240 Author: ct Time: 15 July 2021, 12:04:53.78757 am UUID: 624f6c2a-2072-d94c-8dd0-90beb93b74d4 Ancestors: System-mt.1239 MailSender: Allows for empty passwords. Also improves multilingual support. Thanks to David Stes for the pointer! =============== Diff against System-mt.1239 =============== Item was changed: ----- Method: MailSender class>>setSmtpServer (in category 'settings') ----- setSmtpServer "Set the SMTP server used to send outgoing messages via" SmtpServer ifNil: [SmtpServer := '']. SmtpServer := UIManager default + request: 'What is your mail server for outgoing mail?' translated - request: 'What is your mail server for outgoing mail?' initialAnswer: SmtpServer. ! Item was changed: ----- Method: MailSender class>>setSmtpServerPort (in category 'settings') ----- setSmtpServerPort "Set the SMTP server port used to send outgoing messages via" SmtpServerPort ifNil: [SmtpServerPort := 25]. SmtpServerPort := (UIManager default + request: 'What is your mail server port for outgoing mail?' translated - request: 'What is your mail server port for outgoing mail?' initialAnswer: SmtpServerPort asString) asNumber. ! Item was changed: ----- Method: MailSender class>>setUserEmail (in category 'settings') ----- setUserEmail "Change the user's email for use in composing messages." (UIManager default + request: 'What is your email address?\(This is the address other people will reply to you)' withCRs translated - request: 'What is your email address?\(This is the address other people will reply to you)' withCRs initialAnswer: (UserEmail ifNil: [UserEmail := ''])) ifNotNil: [:answer | UserEmail := answer]! Item was changed: ----- Method: MailSender class>>setUserName (in category 'settings') ----- setUserName (UIManager default + request: 'What is your user name on the SMTP server?' translated - request: 'What is your user name on the SMTP server?' withCRs initialAnswer: (UserName ifNil: [UserName := ''])) ifNotNil: [:answer | UserName := answer]! Item was changed: ----- Method: MailSender class>>setUserPassword (in category 'settings') ----- setUserPassword UserPassword ifNil: [UserPassword := '']. (UIManager default + requestPassword: 'What is your server password?' translated) - requestPassword: 'What is your server passwort?' withCRs) ifNotNil: [:answer | UserPassword := answer]! Item was changed: ----- Method: MailSender class>>smtpServer (in category 'accessing') ----- smtpServer "Answer the server for sending email" self isSmtpServerSet ifFalse: [self setSmtpServer]. + SmtpServer isEmpty ifTrue: [self error: 'no SMTP server specified' translated]. - SmtpServer isEmpty ifTrue: [ self error: 'no SMTP server specified' ]. ^SmtpServer! Item was changed: ----- Method: MailSender class>>smtpServerPort (in category 'accessing') ----- smtpServerPort "Answer the server for sending email" self isSmtpServerPortSet ifFalse: [self setSmtpServerPort]. + SmtpServerPort isNil ifTrue: [self error: 'no SMTP server port specified' translated]. - SmtpServerPort isNil ifTrue: [ self error: 'no SMTP server port specified' ]. ^SmtpServerPort! Item was changed: ----- Method: MailSender class>>userEmail (in category 'accessing') ----- userEmail "Answer the user name to be used for sending out messages." self isUserEmailSet ifFalse: [self setUserEmail]. + UserEmail isEmpty ifTrue: [self error: 'no user email specified' translated]. - UserEmail isEmpty ifTrue: [ self error: 'no user email specified' ]. ^UserEmail! Item was changed: ----- Method: MailSender class>>userName (in category 'accessing') ----- userName "Answer the user name to be used for sending out messages." self isUserNameSet ifFalse: [self setUserName]. + UserName isEmpty ifTrue: [self error: 'no user name specified' translated]. - UserName isEmpty ifTrue: [ self error: 'no user name specified' ]. ^UserName! Item was changed: ----- Method: MailSender class>>userPassword (in category 'accessing') ----- userPassword self isUserPasswordSet ifFalse: [self setUserPassword]. + "UserPassword isEmpty ifTrue: [self error: 'no user name specified' translated]." - UserPassword isEmpty ifTrue: [ self error: 'no user name specified' ]. ^ UserPassword! Item was added: + ----- Method: Preferences class>>allowEtoyUserCustomEvents (in category 'standard queries') ----- + allowEtoyUserCustomEvents + ^ self + valueOfFlag: #allowEtoyUserCustomEvents + ifAbsent: [false]!

1 0

← Newer
1
...
10
11
12
13
14
15
16
17
18
Older →

Jump to page: