Squeak-dev July 2016

squeak-dev@lists.squeakfoundation.org

38 participants
224 discussions

Re: The Trunk: Morphic-topa.784.mcz
by Marcel Taeumel 10 Apr '17

10 Apr '17

Nice! :) <http://forum.world.st/file/n4813138/font-importer.png> Two questions: 1. Who does the rendering? Looks kind of irregular... See attachment. 2. Can we move it to the "Tools" package? Best, Marcel -- View this message in context: http://forum.world.st/The-Trunk-Morphic-topa-784-mcz-tp4813130p4813138.html Sent from the Squeak - Dev mailing list archive at Nabble.com.

4 14

New, faster RISC OS Squeak
by Chris Cunnington 01 Oct '16

01 Oct '16

I get a File 'System:Modules.StreamMan' not found error. I take it from here [1] [2] that StreamMan is short for StreamManager. And that it should be in the sharedsoundbuffer.!System folder. I shift+double clicked and followed !Shared.350.Modules to see StreamMan in this directory. The file appears present but still there is an error. Chris [1] http://permalink.gmane.org/gmane.comp.lang.smalltalk.squeak.vm.devel/9468 [2] http://www.raspberrypi.org/phpBB3/viewtopic.php?t=29504&p=278048

5 15

Smallapack
by Yoshiki Ohshima 12 Sep '16

12 Sep '16

I am trying to do a bit of linear algebra stuff that involves to solve a sparse 2D matrix (for a variation of doing least square fit). There was a message from Nicolas: http://lists.squeakfoundation.org/pipermail/squeak-dev/2011-August/161113.h… Is this where it stands today, too? It looks like that arg count problem is still there in 5.0, but is it in a way non-issue as it is still FFI based? Thanks! -- -- Yoshiki

2 18

20 Years of Squeak
by Chris Muller 09 Sep '16

09 Sep '16

> As these dates suggest, our goal is to have the release before this year's > ESUG. However, there is another important Smalltalk-related event this year: > 20 years of Squeak. :-) Yeah! It was around October 1996, when the first > Squeak came into the world. ...having its own worlds. :D So, it would only > make sense to also have a special release for this birthday. For this, we > revived all of the cool multimedia content, known from Squeak 1 through > Squeak 3, and made it fit for the current Squeak code base. Oh, this is so > exciting. :-) This is awesome and deserves its own thread!!

14 28

[ANN] The Squeak Shell
by marcel.taeumel 19 Aug '16

19 Aug '16

Hi, there! I am happy to announce a new kind of project for Squeak: "The Squeak Shell". :-) You can install it into any trunk image via: Installer swa project: 'SqueakShell'; install: 'SqueakShell'. Then you will find a new kind of project under Projects -> New Project ... The Squeak Shell is independent from Morphic and MVC. It's architecture is, partially, a mixture of both. :-D I wanted to keep it as simple as possible while avoiding global state as much as possible. My goal is to add it to trunk to simplify modularization of MVC and Morphic. For example, we have to extract UserInputEvent and Canvas from Morphic into the base system. These would form a splendid addition to other projects because object-oriented event processing and displaying is not something that only Morphic should have. The Squeak Shell helped me refactor Squeak's project mechanism. It also revealed potential improvements for our Debugger, which I am going to address later this year. One goal is to make Squeak more robust and mitigate the risk of getting locked out of the system. Here is the interesting part: It can be used to recover from serious/recursive errors in Morphic and MVC. When you open a new Morphic project from within a Squeak Shell project, the shell will appear then. Only recursive errors in the shell will then start our traditional emergency evaluator. Some figures: 12 classes, 274 methods, 1454 LOC. You can open the Squeak Shell on top of the Morphic loop ("SqueakShell open") or as custom process inside the Morphic project ("SqueakShell openConcurrent"). You enter a SqueakShell project via: "SqueakShell openAsProject". The core of the Squeak Shell covers only 6 classes (see "SqueakShell-Core"). There are already two applications in this project: (1) a command line and (2) a text editor (see "SqueakShell-Tools"). You can use the Squeak Shell to explore all our tool extension points, which we use for browsing classes, inspecting objects, debugging unhandled errors in processes, etc. For this, take a look at SqshProject, SqshToolSet, and SqshUIManager. I am sure that there can be an even smaller kind of project. However, I am not so sure about the usefulness of such a project. :-) <http://forum.world.st/file/n4905613/shell.png> Have fun! Marcel -- View this message in context: http://forum.world.st/ANN-The-Squeak-Shell-tp4905613.html Sent from the Squeak - Dev mailing list archive at Nabble.com.

9 18

Re: [squeak-dev] The Trunk: System-eem.835.mcz
by Tobias Pape 05 Aug '16

05 Aug '16

On 06.07.2016, at 01:13, commits(a)source.squeak.org wrote: > Eliot Miranda uploaded a new version of System to project The Trunk: > http://source.squeak.org/trunk/System-eem.835.mcz > > ==================== Summary ==================== > > Name: System-eem.835 > Author: eem > Time: 5 July 2016, 6:13:25.980763 pm > UUID: 44354df1-cecb-414c-a705-daa84b7388dd > Ancestors: System-eem.834 > > Fix reading methods from DataStreams on Spur. Old code used pre-Spur numLits header format, and was not 64-bit aware. > Does that mean that pre-Spur methods on datastreams cannot be read in Spur images? That would be a bummer… Best regards -Tobias > =============== Diff against System-eem.834 =============== > > Item was changed:

3 5

Re: [squeak-dev] The Inbox: Network-ul.180.mcz
by Levente Uzonyi 03 Aug '16

03 Aug '16

Hi All, This is something to test on all platforms before push. I've used it on 64-bit linux without problems so far. Levente On Mon, 25 Jul 2016, commits(a)source.squeak.org wrote: > Levente Uzonyi uploaded a new version of Network to project The Inbox: > http://source.squeak.org/inbox/Network-ul.180.mcz > > ==================== Summary ==================== > > Name: Network-ul.180 > Author: ul > Time: 25 July 2016, 8:40:01.001452 pm > UUID: 2f23a55c-fec5-41ac-95bd-6a8c2458be95 > Ancestors: Network-nice.179 > > Socket changes: > - fixed the comment of #isOtherEndConnected and #isThisEndConnected > - do not slice the data (TCP) in the image in #sendData:. Let the VM, the kernel, the hardware deal with that. > - use #isOtherEndConnected when receiving data, and #isThisEndConnected when sending data instead of #isConnected > - move away from #milliseconds:since:, since we have a clock that won't roll over > > =============== Diff against Network-nice.179 =============== > > Item was changed: > ----- Method: Socket>>closeAndDestroy: (in category 'connection open/close') ----- > closeAndDestroy: timeoutSeconds > "First, try to close this connection gracefully. If the close attempt fails or times out, abort the connection. In either case, destroy the socket. Do nothing if the socket has already been destroyed (i.e., if its socketHandle is nil)." > > + socketHandle ifNil: [ ^self ]. > + self isThisEndConnected ifTrue: [ > + self close. "Close this end." ]. > + (self waitForDisconnectionFor: timeoutSeconds) ifFalse: [ > + "The other end has not closed the connect yet, so we will just abort it." > + self primSocketAbortConnection: socketHandle ]. > + self destroy! > - socketHandle ifNotNil: [ > - self isConnected ifTrue: [ > - self close. "close this end" > - (self waitForDisconnectionFor: timeoutSeconds) ifFalse: [ > - "The other end didn't close so we just abort the connection" > - self primSocketAbortConnection: socketHandle]]. > - self destroy]. > - ! > > Item was changed: > ----- Method: Socket>>discardReceivedData (in category 'receiving') ----- > discardReceivedData > "Discard any data received up until now, and return the number of bytes discarded." > > | buf totalBytesDiscarded | > buf := String new: 10000. > totalBytesDiscarded := 0. > + [self isOtherEndConnected and: [self dataAvailable]] whileTrue: [ > - [self isConnected and: [self dataAvailable]] whileTrue: [ > totalBytesDiscarded := > totalBytesDiscarded + (self receiveDataInto: buf)]. > ^ totalBytesDiscarded > ! > > Item was changed: > ----- Method: Socket>>isOtherEndConnected (in category 'queries') ----- > isOtherEndConnected > + "Return true if this socket is connected, or this end has closed the connection but not the other end, so we can still receive data." > - "Return true if this socket is connected, or this end has closed the connection but not the other end, so we can still send data." > > | state | > socketHandle ifNil: [ ^false ]. > (state := self primSocketConnectionStatus: socketHandle) == Connected ifTrue: [ ^true ]. > ^state == ThisEndClosed > ! > > Item was changed: > ----- Method: Socket>>isThisEndConnected (in category 'queries') ----- > isThisEndConnected > + "Return true if this socket is connected, other the other end has closed the connection but not this end, so we can still send data." > - "Return true if this socket is connected, other the other end has closed the connection but not this end, so we can still receive data." > > | state | > socketHandle ifNil: [ ^false ]. > (state := self primSocketConnectionStatus: socketHandle) == Connected ifTrue: [ ^true ]. > ^state == OtherEndClosed > ! > > Item was changed: > ----- Method: Socket>>sendData: (in category 'sending') ----- > sendData: aStringOrByteArray > "Send all of the data in the given array, even if it requires multiple calls to send it all. Return the number of bytes sent." > > "An experimental version use on slow lines: Longer timeout and smaller writes to try to avoid spurious timeouts." > > | bytesSent bytesToSend count | > bytesToSend := aStringOrByteArray size. > bytesSent := 0. > [bytesSent < bytesToSend] whileTrue: [ > (self waitForSendDoneFor: 60) > ifFalse: [ConnectionTimedOut signal: 'send data timeout; data not sent']. > count := self primSocket: socketHandle > sendData: aStringOrByteArray > startIndex: bytesSent + 1 > + count: bytesToSend - bytesSent. > - count: (bytesToSend - bytesSent min: DefaultSendBufferSize). > bytesSent := bytesSent + count]. > > ^ bytesSent > ! > > Item was changed: > ----- Method: Socket>>waitForConnectionFor:ifTimedOut:ifRefused: (in category 'waiting') ----- > waitForConnectionFor: timeout ifTimedOut: timeoutBlock ifRefused: refusedBlock > "Wait up until the given deadline for a connection to be established. Return true if it is established by the deadline, false if not." > > + | deadline timeLeft status | > + deadline := Time millisecondClockValue + (timeout * 1000) truncated. > + (status := self primSocketConnectionStatus: socketHandle) == Connected ifTrue: [^true]. > + [ (status == WaitingForConnection) and: [ (timeLeft := deadline - Time millisecondClockValue) > 0 ] ] > - | startTime msecsDelta msecsEllapsed status | > - startTime := Time millisecondClockValue. > - msecsDelta := (timeout * 1000) truncated. > - status := self primSocketConnectionStatus: socketHandle. > - status = Connected ifTrue: [^true]. > - [(status = WaitingForConnection) and: [(msecsEllapsed := Time millisecondsSince: startTime) < msecsDelta]] > whileTrue: [ > + semaphore waitTimeoutMSecs: timeLeft. > + status := self primSocketConnectionStatus: socketHandle ]. > + status == Connected ifTrue: [ ^true ]. > + status == WaitingForConnection > + ifTrue: [ timeoutBlock value ] > + ifFalse: [ refusedBlock value ]. > + ^false! > - semaphore waitTimeoutMSecs: msecsDelta - msecsEllapsed. > - status := self primSocketConnectionStatus: socketHandle]. > - status = Connected > - ifFalse: [ > - status = WaitingForConnection > - ifTrue: [timeoutBlock value] > - ifFalse: [refusedBlock value]. > - ^false]. > - ^ true! > > Item was changed: > ----- Method: Socket>>waitForConnectionUntil: (in category 'waiting') ----- > waitForConnectionUntil: deadline > "Wait up until the given deadline for a connection to be established. Return true if it is established by the deadline, false if not." > > + | status timeLeft | > - | status waitTime | > [ > (status := self primSocketConnectionStatus: socketHandle) == Connected ifTrue: [ ^true ]. > status == WaitingForConnection ifFalse: [ ^false ]. > + (timeLeft := deadline - Time millisecondClockValue) <= 0 ifTrue: [ ^false ]. > + semaphore waitTimeoutMSecs: timeLeft ] repeat! > - (waitTime := deadline - Time millisecondClockValue) > 0 ifFalse: [ ^false ]. > - semaphore waitTimeoutMSecs: waitTime ] repeat! > > Item was changed: > ----- Method: Socket>>waitForDataFor:ifClosed:ifTimedOut: (in category 'waiting') ----- > waitForDataFor: timeout ifClosed: closedBlock ifTimedOut: timedOutBlock > "Wait for the given nr of seconds for data to arrive." > > + | deadline timeLeft | > - | startTime msecsDelta | > socketHandle ifNil: [ ^closedBlock value ]. > + deadline := Time millisecondClockValue + (timeout * 1000) truncated. > - startTime := Time millisecondClockValue. > - msecsDelta := (timeout * 1000) truncated. > [ > (self primSocketReceiveDataAvailable: socketHandle) ifTrue: [ ^self ]. > + self isOtherEndConnected ifFalse: [ ^closedBlock value ]. > + (timeLeft := deadline - Time millisecondClockValue) <= 0 ifTrue: [ ^timedOutBlock value ]. > - self isConnected ifFalse: [ ^closedBlock value ]. > - (Time millisecondsSince: startTime) < msecsDelta ifFalse: [ ^timedOutBlock value ]. > "Providing a maximum for the time for waiting is a workaround for a VM bug which causes sockets waiting for data forever in some rare cases, because the semaphore doesn't get signaled. Remove the ""min: self class maximumReadSemaphoreWaitTimeout"" part when the bug is fixed." > readSemaphore waitTimeoutMSecs: > + (timeLeft min: self class maximumReadSemaphoreWaitTimeout) ] repeat! > - (msecsDelta - (Time millisecondsSince: startTime) min: self class maximumReadSemaphoreWaitTimeout) ] repeat! > > Item was changed: > ----- Method: Socket>>waitForDataIfClosed: (in category 'waiting') ----- > waitForDataIfClosed: closedBlock > "Wait indefinitely for data to arrive. This method will block until > data is available or the socket is closed." > > socketHandle ifNil: [ ^closedBlock value ]. > [ > (self primSocketReceiveDataAvailable: socketHandle) ifTrue: [ ^self ]. > + self isOtherEndConnected ifFalse: [ ^closedBlock value ]. > - self isConnected ifFalse: [ ^closedBlock value ]. > "ul 8/13/2014 21:16 > Providing a maximum for the time for waiting is a workaround for a VM bug which > causes sockets waiting for data forever in some rare cases, because the semaphore > doesn't get signaled. Replace the ""waitTimeoutMSecs: self class maximumReadSemaphoreWaitTimeout"" > part with ""wait"" when the bug is fixed." > readSemaphore waitTimeoutMSecs: self class maximumReadSemaphoreWaitTimeout ] repeat! > > Item was changed: > ----- Method: Socket>>waitForDisconnectionFor: (in category 'waiting') ----- > waitForDisconnectionFor: timeout > "Wait for the given nr of seconds for the connection to be broken. > Return true if it is broken by the deadline, false if not. > The client should know the connection is really going to be closed > (e.g., because he has called 'close' to send a close request to the other end) > before calling this method." > > + | deadline | > + deadline := Time millisecondClockValue + (timeout * 1000) truncated. > + [ self isOtherEndConnected and: [ deadline - Time millisecondClockValue > 0 ] ] > + whileTrue: [ > + self discardReceivedData. > + "Providing a maximum for the time for waiting is a workaround for a VM bug which causes sockets waiting for data forever in some rare cases, because the semaphore doesn't get signaled. Remove the ""min: self class maximumReadSemaphoreWaitTimeout"" part when the bug is fixed." > + readSemaphore waitTimeoutMSecs: > + (deadline - Time millisecondClockValue min: self class maximumReadSemaphoreWaitTimeout) ]. > + ^self isOtherEndConnected! > - | startTime msecsDelta status | > - startTime := Time millisecondClockValue. > - msecsDelta := (timeout * 1000) truncated. > - status := self primSocketConnectionStatus: socketHandle. > - [((status == Connected) or: [(status == ThisEndClosed)]) and: > - [(Time millisecondsSince: startTime) < msecsDelta]] whileTrue: [ > - self discardReceivedData. > - "Providing a maximum for the time for waiting is a workaround for a VM bug which causes sockets waiting for data forever in some rare cases, because the semaphore doesn't get signaled. Remove the ""min: self class maximumReadSemaphoreWaitTimeout"" part when the bug is fixed." > - readSemaphore waitTimeoutMSecs: > - (msecsDelta - (Time millisecondsSince: startTime) min: self class maximumReadSemaphoreWaitTimeout). > - status := self primSocketConnectionStatus: socketHandle]. > - ^ status ~= Connected! > > Item was changed: > ----- Method: Socket>>waitForSendDoneFor: (in category 'waiting') ----- > waitForSendDoneFor: timeout > "Wait up until the given deadline for the current send operation to complete. Return true if it completes by the deadline, false if not." > > + | deadline timeleft | > + deadline := Time millisecondClockValue + (timeout * 1000) truncated. > - | startTime msecsDelta msecsEllapsed | > - startTime := Time millisecondClockValue. > - msecsDelta := (timeout * 1000) truncated. > [ > (self primSocketSendDone: socketHandle) ifTrue: [ ^true ]. > + self isThisEndConnected ifFalse: [ ^false ]. > + (timeleft := deadline - Time millisecondClockValue) <= 0 ifTrue: [ ^false ]. > + writeSemaphore waitTimeoutMSecs: timeleft ] repeat! > - self isConnected ifFalse: [ ^false ]. > - (msecsEllapsed := Time millisecondsSince: startTime) < msecsDelta ifFalse: [ ^false ]. > - writeSemaphore waitTimeoutMSecs: msecsDelta - msecsEllapsed ] repeat! > > >

2 4

Re: [squeak-dev] International text input on X11
by Yoshiki Ohshima 02 Aug '16

02 Aug '16

Hi Tim, As the VM changes for this matter is in shape (if I'm not mistaken, the plugins.ext has to have ImmX11Plugin), the following image side changes will greatly help the usability for kids in Japan and elsewhere. Can you add those at some point? On Sun, May 15, 2016 at 1:19 PM, Yoshiki Ohshima <Yoshiki.Ohshima(a)acm.org> wrote: > Then on the image side, we need to fix ImmX11>>keyboardFocusForMorph: > to support non-TextMorphs. My feeble attempt involves to test whether > the given morph understand #paragraph and make it read: > > ------------------- > keyboardFocusForAMorph: aMorph > > aMorph ifNil: [^ self]. > [ > | left bottom pos height | > pos := aMorph preferredKeyboardPosition. > left := (pos x min: Display width max: 0) asInteger. > (aMorph respondsTo: #paragraph) ifTrue: [ > height := (aMorph paragraph > characterBlockForIndex: aMorph editor selectionInterval first) height > ] ifFalse: [ > height := aMorph height]. > bottom := (pos y min: Display height max: 0) asInteger > + height. > self setCompositionWindowPositionX: left y: bottom asInteger > ] on: Error > do: [:ex |]. > > ------------------- > (#asInteger is sent so that the primitive does not get floats.) > > and then to use it StringFieldMorph (and possible a few other classes) > need its #keyboardFocusChange: to read: > > ------------------- > keyboardFocusChange: t1 > (t1 > and: [isKeyboardFocus not]) > ifTrue: [lastContents := stringMorph contents]. > (isKeyboardFocus > and: [t1 not]) > ifTrue: [lastContents := nil. > isNumeric > ifTrue: [self contents: stringMorph contents asNumberNoError printStringNoExponent]. > acceptWhenFocusLost > ifTrue: [self acceptEdits]]. > isKeyboardFocus := t1. > isKeyboardFocus > ifTrue: [selectionStart := 0. > selectionEnd := stringMorph contents size]. > "This line below" > isKeyboardFocus ifTrue: [ActiveHand compositionWindowManager keyboardFocusForAMorph: self]. > self changed > ------------------- > > The result is that when the input method is enabled, and the user > tries to type into a field, the preedit window shows up right there > where you are typing in. -- -- Yoshiki

2 27

[ANN] Widget Refactorings & UI Themes for Squeak
by marcel.taeumel 01 Aug '16

01 Aug '16

Hi, there! :-) TL;DR: Here is a SAR file that cleans up the code of all widget classes such as lists and buttons in your image and adds support for UI theming as well as a bunch of UI themes (choose Themes via "Extras > Themes & Colors"): squeak_trunk_uitheme_v12.sar <http://forum.world.st/file/n4908439/squeak_trunk_uitheme_v12.sar> Here is a preview: http://i.giphy.com/l46CcX46yRE9H6yQ0.gif *Try it out. Report bugs. Report performance issues!!* We will commit the changes to trunk this Saturday. Btw: The SAR installer is compatible with Eliot's current working image. ;o) And there are numerous open windows and projects in that image...^^ ========================================== 0. The Long History of Squeak & UI Theming ========================================== ... http://forum.world.st/Dark-theme-td4869082.html http://forum.world.st/Themes-for-Squeak-5-1-td4882848.html http://forum.world.st/Skylark-Theme-and-Squeak-3-9-td54720.html http://forum.world.st/Non-SmallLand-colour-theme-lying-around-td4697438.htm… ... ======================== 1. User Interface Themes ======================== Chris, Karl, and I designed a very lightweight abstraction to support UI themes in Squeak. You can find the whole implementation in the class UserInterfaceTheme and a bunch of tests in UserInterfaceThemeTests. An object that wants to support theming SHOULD (!) implement three methods: MyFancyClass class >> #themeProperties MyFancyClass >> #applyUserInterfaceTheme MyFancyClass >> #canApplyUserInterfaceTheme It also MUST (!) access the current UI theme when setting visual state. And here comes the nice part: ... self color: (self userInterfaceTheme color ifNil: [Color white]). ... Remember, usually you would write something like this: ... self color: Color white. ... How can this work? It works by using #doesNotUnderstand: and trigger a dynamic lookup in a dictionary inside the current theme: Object >> #userInterfaceTheme ^ UserInterfaceTheme current pushScope: self; yourself UserInterfaceTheme >> #doesNotUnderstand: aMessage ... ^ [self get: scope top class -> aMessage selector] ensure: [scope pop] Isn't this slow? No, not at all. If you have any doubts, try benching it on your machine: UserInterfaceThemeTestObject benchLookup. On my machine, this is even fast enough to support theme lookups in frequently called messages such as Morph >> #drawOn:. However, applications are advised to cache. That's why we have the explicit #applyUserInterfaceTheme callbacks as described above. Note that amazing effects can be achieved by adjusting #color, #borderColor, #borderWidth, #fillStyle, and fonts. :-) The existing themes do exactly that. To get a feeling of the impact of having themes in Squeak, try browsing senders and implementors of #applyUserInterfaceTheme, #themeProperties, #userInterfaceTheme, and maybe #canApplyUserInterfaceTheme. I think we can still reduce the number of sends to #userInterfaceTheme a little more. ================================== 2. Code clean-up in widget classes ================================== We made Shout look up the current theme to build its internal cache of text attributes to quickly style code as you type it. We removed window color specifications and replaced them by simply implementing Model >> #defaultWindowColor. There is also still the #uniformWindowColor if you do not like colorful windows. This makes it also much easier for new applications to have their own window color. We unified the implementation of MenuMorph and DockingBarMorph and fixed several bugs there. Dialogs! *phew* ... *arrrrgss* ... Dialogs. :-) We managed to introduce a general DialogWindow class. FillInTheBlankMorph and UserDialogBoxMorph are now mere subclasses with a custom interface. There is also support for ToolBuilder, see ListChooser for an example. *yay* Buttons feel more like buttons now. It's a good thing, right? For lists and trees and text boxes, we greatly reduced the amount of code that just accessed global state. LazyListMorph, NewParagraph, TextMorph, IndentingListItemMorph, ... they all now get configured by their "hosts", which are PluggableListMorph, PluggableTextMorph, and SimpleHierarchicalListMorph. Having this, we improved the modular structure of our whole Squeak widget library. That modular structure made applying themes much easier. :-) ======================== 3. Theme all the widgets ======================== There is a nice existing pattern with the message #setDefaultParameters, which is usually called from #initialize. Go, see for yourself. Browse implementors of #setDefaultParameters. We used that pattern and cleaned up many implementations of that message in the image. Note that rounded corners, gradients, colorful windows, and shadows are still preferences outside of UI themes. You can toggle them in any UI theme. Note that the background color/image is also not subject to be themed. Just drop your favorite picture or pattern in the image. It's really easy. Now, take a look at the class SqueakTheme. There, you will find source code for creating the default Squeak theme to be shared via SqueakSource and reset during the release building process. :-) Besides get/set/clear -- which might be expected from the theme structure because it is basically a dictionary with some properties -- There, you will notice a "merge" or "link" or "derive". When creating themes programmatically, you can: - derive properties from other properties - link themes to extend property look-up - merge one theme into another theme How does property look-up work? Well, see UserInterfaceTheme >> #get: 1. Look up the key, which is usually "Class -> symbol". 2. Try the superclass chain. 3. Try the same lookup in the linked theme if any. Theoretically, you could actually implement messages in subclasses of UserInterfaceTheme and bypass that DNU-triggered lookup. We do not do this right now. As you can see, Squeak/Smalltalk offers a great deal of flexibility. It is remains subject to discussion of how to employ the language and its semantics. Think of the current implementation of user interface themes as one way that represents a trade-off between a concise programming interface (i.e. ... self userInterfaceTheme color ifNil ...), a fair amount of comprehensive patterns (i.e. #setDefaultParameters, #applyUserInterfaceTheme, ...), and some other existing constraints (i.e. old code, Monticello/Squeaksource, existing tools such as senders/implementors, ...). Happy Squeaking! Marcel, Chris, Karl -- View this message in context: http://forum.world.st/ANN-Widget-Refactorings-UI-Themes-for-Squeak-tp490843… Sent from the Squeak - Dev mailing list archive at Nabble.com.

4 12

Daily Commit Log
by commits＠source.squeak.org 31 Jul '16

31 Jul '16

Changes to Trunk (http://source.squeak.org/trunk.html) in the last 24 hours: http://lists.squeakfoundation.org/pipermail/packages/2016-July/068342.html Name: System-mt.851 Ancestors: System-mt.850 *** Widget Refactorings and UI Themes (Part 1 of 11) *** Adds the core theming mechanism ============================================= http://lists.squeakfoundation.org/pipermail/packages/2016-July/068343.html Name: Morphic-mt.1207 Ancestors: Morphic-tfel.1206 *** Widget Refactorings and UI Themes (Part 1 of 11) *** By default, morphs can only apply themes if they are in the world. Prevents prototypes and other invisible/broken stuff from changing too often or causing debuggers. ============================================= http://lists.squeakfoundation.org/pipermail/packages/2016-July/068344.html Name: Tests-mt.347 Ancestors: Tests-pre.346 *** Widget Refactorings and UI Themes (Part 1 of 11) *** Tests for the theming mechanism. And a benchmark. ============================================= http://lists.squeakfoundation.org/pipermail/packages/2016-July/068345.html Name: Kernel-mt.1034 Ancestors: Kernel-topa.1033 *** Widget Refactorings and UI Themes (Part 2 of 11) *** Simplify window colors and prepare them and other properties of system windows to be themed. ============================================= http://lists.squeakfoundation.org/pipermail/packages/2016-July/068346.html Name: System-mt.852 Ancestors: System-mt.851 *** Widget Refactorings and UI Themes (Part 2 of 11) *** Simplify window colors and prepare them and other properties of system windows to be themed. ============================================= http://lists.squeakfoundation.org/pipermail/packages/2016-July/068347.html Name: Morphic-mt.1208 Ancestors: Morphic-mt.1207 *** Widget Refactorings and UI Themes (Part 2 of 11) *** Simplify window colors and prepare them and other properties of system windows to be themed. ============================================= http://lists.squeakfoundation.org/pipermail/packages/2016-July/068348.html Name: 51Deprecated-mt.34 Ancestors: 51Deprecated-mt.33 *** Widget Refactorings and UI Themes (Part 2 of 11) *** Simplify window colors and prepare them and other properties of system windows to be themed. ============================================= http://lists.squeakfoundation.org/pipermail/packages/2016-July/068349.html Name: ToolBuilder-Morphic-mt.171 Ancestors: ToolBuilder-Morphic-mt.170 *** Widget Refactorings and UI Themes (Part 2 of 11) *** Simplify window colors and prepare them and other properties of system windows to be themed. ============================================= http://lists.squeakfoundation.org/pipermail/packages/2016-July/068350.html Name: Tools-mt.710 Ancestors: Tools-tfel.709 *** Widget Refactorings and UI Themes (Part 2 of 11) *** Simplify window colors and prepare them and other properties of system windows to be themed. ============================================= http://lists.squeakfoundation.org/pipermail/packages/2016-July/068351.html Name: PreferenceBrowser-mt.62 Ancestors: PreferenceBrowser-topa.61 *** Widget Refactorings and UI Themes (Part 2 of 11) *** Simplify window colors and prepare them and other properties of system windows to be themed. ============================================= http://lists.squeakfoundation.org/pipermail/packages/2016-July/068352.html Name: Collections-mt.702 Ancestors: Collections-topa.701 *** Widget Refactorings and UI Themes (Part 2 of 11) *** Simplify window colors and prepare them and other properties of system windows to be themed. ============================================= http://lists.squeakfoundation.org/pipermail/packages/2016-July/068353.html Name: Monticello-mt.640 Ancestors: Monticello-cmm.639 *** Widget Refactorings and UI Themes (Part 2 of 11) *** Simplify window colors and prepare them and other properties of system windows to be themed. ============================================= http://lists.squeakfoundation.org/pipermail/packages/2016-July/068354.html Name: SmallLand-ColorTheme-mt.7 Ancestors: SmallLand-ColorTheme-fbs.6 *** Widget Refactorings and UI Themes (Part 2 of 11) *** Simplify window colors and prepare them and other properties of system windows to be themed. ============================================= http://lists.squeakfoundation.org/pipermail/packages/2016-July/068355.html Name: SUnitGUI-mt.63 Ancestors: SUnitGUI-mt.62 *** Widget Refactorings and UI Themes (Part 2 of 11) *** Simplify window colors and prepare them and other properties of system windows to be themed. ============================================= http://lists.squeakfoundation.org/pipermail/packages/2016-July/068356.html Name: EToys-mt.140 Ancestors: EToys-tfel.139 *** Widget Refactorings and UI Themes (Part 2 of 11) *** Simplify window colors and prepare them and other properties of system windows to be themed. ============================================= http://lists.squeakfoundation.org/pipermail/packages/2016-July/068357.html Name: Nebraska-mt.42 Ancestors: Nebraska-kfr.41 *** Widget Refactorings and UI Themes (Part 2 of 11) *** Simplify window colors and prepare them and other properties of system windows to be themed. ============================================= http://lists.squeakfoundation.org/pipermail/packages/2016-July/068358.html Name: Protocols-mt.55 Ancestors: Protocols-mt.54 *** Widget Refactorings and UI Themes (Part 2 of 11) *** Simplify window colors and prepare them and other properties of system windows to be themed. ============================================= http://lists.squeakfoundation.org/pipermail/packages/2016-July/068359.html Name: SMLoader-mt.88 Ancestors: SMLoader-tpr.87 *** Widget Refactorings and UI Themes (Part 2 of 11) *** Simplify window colors and prepare them and other properties of system windows to be themed. ============================================= http://lists.squeakfoundation.org/pipermail/packages/2016-July/068360.html Name: Morphic-mt.1209 Ancestors: Morphic-mt.1208 Avoid updating the menu bar instances too early. ============================================= http://lists.squeakfoundation.org/pipermail/packages/2016-July/068361.html Name: 51Deprecated-mt.35 Ancestors: 51Deprecated-mt.34 Clean-up window color spec data if requested. ============================================= http://lists.squeakfoundation.org/pipermail/packages/2016-July/068362.html Name: ShoutCore-mt.56 Ancestors: ShoutCore-eem.55 *** Widget Refactorings and UI Themes (Part 3 of 11) *** Prepare Shout syntax highlighting for UI themes. (Temporarily no syntax highlighting. Sorry. Be patient.) ============================================= http://lists.squeakfoundation.org/pipermail/packages/2016-July/068363.html Name: System-mt.853 Ancestors: System-mt.852 *** Widget Refactorings and UI Themes (Part 3 of 11) *** Prepare Shout syntax highlighting for UI themes. (Temporarily no syntax highlighting. Sorry. Be patient.) ============================================= http://lists.squeakfoundation.org/pipermail/packages/2016-July/068364.html Name: ToolBuilder-Morphic-mt.172 Ancestors: ToolBuilder-Morphic-mt.171 *** Widget Refactorings and UI Themes (Part 3 of 11) *** Prepare Shout syntax highlighting for UI themes. (Temporarily no syntax highlighting. Sorry. Be patient.) ============================================= http://lists.squeakfoundation.org/pipermail/packages/2016-July/068365.html Name: 51Deprecated-mt.36 Ancestors: 51Deprecated-mt.35 *** Widget Refactorings and UI Themes (Part 3 of 11) *** Prepare Shout syntax highlighting for UI themes. (Temporarily no syntax highlighting. Sorry. Be patient.) ============================================= http://lists.squeakfoundation.org/pipermail/packages/2016-July/068366.html Name: Morphic-mt.1210 Ancestors: Morphic-mt.1209 *** Widget Refactorings and UI Themes (Part 4 of 11) *** Some fixes and refactorings in menus and docking bars. Prepare both for UI themeing. ============================================= http://lists.squeakfoundation.org/pipermail/packages/2016-July/068367.html Name: 51Deprecated-mt.37 Ancestors: 51Deprecated-mt.36 *** Widget Refactorings and UI Themes (Part 4 of 11) *** Some fixes and refactorings in menus and docking bars. Prepare both for UI themeing. ============================================= http://lists.squeakfoundation.org/pipermail/packages/2016-July/068368.html Name: Morphic-mt.1211 Ancestors: Morphic-mt.1210 *** Widget Refactorings and UI Themes (Part 5 of 11) *** Some fixes and refactorings for dialogs including added support for UI theming. ============================================= http://lists.squeakfoundation.org/pipermail/packages/2016-July/068369.html Name: Compiler-mt.324 Ancestors: Compiler-eem.323 *** Widget Refactorings and UI Themes (Part 5 of 11) *** Some fixes and refactorings for dialogs including added support for UI theming. ============================================= http://lists.squeakfoundation.org/pipermail/packages/2016-July/068370.html Name: ToolBuilder-Kernel-mt.100 Ancestors: ToolBuilder-Kernel-mt.99 *** Widget Refactorings and UI Themes (Part 5 of 11) *** Some fixes and refactorings for dialogs including added support for UI theming. ============================================= http://lists.squeakfoundation.org/pipermail/packages/2016-July/068371.html Name: ToolBuilder-Morphic-mt.173 Ancestors: ToolBuilder-Morphic-mt.172 *** Widget Refactorings and UI Themes (Part 5 of 11) *** Some fixes and refactorings for dialogs including added support for UI theming. ============================================= http://lists.squeakfoundation.org/pipermail/packages/2016-July/068372.html Name: Morphic-mt.1212 Ancestors: Morphic-mt.1211 *** Widget Refactorings and UI Themes (Part 6 of 11) *** Some fixes and refactorings for buttons including added support for UI theming. ============================================= http://lists.squeakfoundation.org/pipermail/packages/2016-July/068373.html Name: ToolBuilder-Morphic-mt.174 Ancestors: ToolBuilder-Morphic-mt.173 *** Widget Refactorings and UI Themes (Part 6 of 11) *** Some fixes and refactorings for buttons including added support for UI theming. ============================================= http://lists.squeakfoundation.org/pipermail/packages/2016-July/068374.html Name: Morphic-mt.1213 Ancestors: Morphic-mt.1212 *** Widget Refactorings and UI Themes (Part 6 of 11) *** Some fixes and refactorings for lists, trees, text boxes --- including added support for UI theming. ============================================= http://lists.squeakfoundation.org/pipermail/packages/2016-July/068375.html Name: ToolBuilder-Kernel-mt.101 Ancestors: ToolBuilder-Kernel-mt.100 *** Widget Refactorings and UI Themes (Part 6 of 11) *** Some fixes and refactorings for lists, trees, text boxes --- including added support for UI theming. ============================================= http://lists.squeakfoundation.org/pipermail/packages/2016-July/068376.html Name: ToolBuilder-Morphic-mt.175 Ancestors: ToolBuilder-Morphic-mt.174 *** Widget Refactorings and UI Themes (Part 6 of 11) *** Some fixes and refactorings for lists, trees, text boxes --- including added support for UI theming. ============================================= http://lists.squeakfoundation.org/pipermail/packages/2016-July/068377.html Name: Tools-mt.711 Ancestors: Tools-mt.710 *** Widget Refactorings and UI Themes (Part 6 of 11) *** Some fixes and refactorings for lists, trees, text boxes --- including added support for UI theming. ============================================= http://lists.squeakfoundation.org/pipermail/packages/2016-July/068378.html Name: 51Deprecated-mt.38 Ancestors: 51Deprecated-mt.37 *** Widget Refactorings and UI Themes (Part 6 of 11) *** Some fixes and refactorings for lists, trees, text boxes --- including added support for UI theming. ============================================= http://lists.squeakfoundation.org/pipermail/packages/2016-July/068379.html Name: System-mt.854 Ancestors: System-mt.853 *** Widget Refactorings and UI Themes (Part 7 of 11) *** Look-up and store default fonts in the current theme. ============================================= http://lists.squeakfoundation.org/pipermail/packages/2016-July/068380.html Name: Morphic-mt.1214 Ancestors: Morphic-mt.1213 *** Widget Refactorings and UI Themes (Part 8 of 11) *** Adds minimal tool support for UI themes to world main docking bar's EXTRAS menu. ============================================= http://lists.squeakfoundation.org/pipermail/packages/2016-July/068381.html Name: Morphic-mt.1215 Ancestors: Morphic-mt.1214 *** Widget Refactorings and UI Themes (Part 10 of 11) *** Drop shadow theme support and keyboard focus color theme support. ============================================= http://lists.squeakfoundation.org/pipermail/packages/2016-July/068382.html Name: System-mt.855 Ancestors: System-mt.854 *** Widget Refactorings and UI Themes (Part 11 of 11) *** Some UI themes. :-) ============================================= http://lists.squeakfoundation.org/pipermail/packages/2016-July/068383.html Name: Morphic-mt.1216 Ancestors: Morphic-mt.1215 Small fix for the button border that was not updated correctly once a disabled button got enabled again. ============================================= http://lists.squeakfoundation.org/pipermail/packages/2016-July/068384.html Name: Morphic-mt.1217 Ancestors: Morphic-mt.1216 Makes icon labels in scroll bar buttons visible again for Solarized and Monokai themes. Those have no distinct border color for scroll bar buttons, which is normally used for determining the color of the iconic labels. =============================================

1 0

Jump to page: