Squeak-dev February 2020

squeak-dev@lists.squeakfoundation.org

32 participants
306 discussions

5.3 cannot rename subclasses of Error
by Chris Muller 26 Feb '20

26 Feb '20

In trunk / 5.3 RC. - Make a subclass of Error called MyError1 - Make a subclass of Error called MyError2 - Delete MyError1 - Try to rename MyError2 to MyError1 The last step fails. No errors or debuggers, but the class is not renamed. Works in 5.2.

4 12

Infinite dialog loop in authorinitials
by K K Subbu 26 Feb '20

26 Feb '20

Hi, I often press ctrl-v instead of alt-v by accident in Squeak and get an dialog that doesn't go away. This is because of an infinite loop in: Utilities>>authorInitials [AuthorInitials isEmpty] whileTrue: [self setAuthorInitials]. ^ AuthorInitials called from TextEditor>>pasteInitials:. Should this be changed to: AuthorInitials ifEmpty: [ self setAuthorInitials ]. ^AuthorInitials Regards .. Subbu

4 8

The Inbox: ReleaseBuilder-dtl.206.mcz
by commits＠source.squeak.org 26 Feb '20

26 Feb '20

David T. Lewis uploaded a new version of ReleaseBuilder to project The Inbox: http://source.squeak.org/inbox/ReleaseBuilder-dtl.206.mcz ==================== Summary ==================== Name: ReleaseBuilder-dtl.206 Author: dtl Time: 25 February 2020, 8:59:15.139043 pm UUID: 152e98c7-855a-4aef-a8c3-c6530f11688a Ancestors: ReleaseBuilder-fn.205 Tidy up change sets for release images. Empty the home project change set and give it a better name. =============== Diff against ReleaseBuilder-fn.205 =============== Item was changed: ----- Method: ReleaseBuilder class>>configureProjects (in category 'scripts') ----- configureProjects "Set up the desired configuration of projects, which might be a single project, multiple projects..." + | homeProject rootProject activeChangeSets | - | homeProject rootProject | homeProject := Project current. rootProject := homeProject. homeProject isMorphic ifFalse: [ Warning signal: 'The current project is not Morphic. Please create a new Morphic project, enter it, and restart the release building process.']. "The home project is a single Morphic project. Let the home project have a parent MVC project as the root of the project tree. The MVC project supports emergency debugging in the event of unrecoverable Morphic problems, and will fall back on the traditional emergency evaluator if MVC debugging fails. If MVC is not installed in the image, then do nothing." Project current removeAllOtherProjects. (Smalltalk classNamed: #MVCProject) ifNil: [Warning signal: 'MVC must be installed in the release image.'] ifNotNil: [:mvc | rootProject := (mvc new name: 'The root project')]. self assert: homeProject isTopProject; assert: rootProject isTopProject not. rootProject beTopProject. self assert: rootProject isTopProject; assert: homeProject isTopProject not. self assert: rootProject subProjects size = 1; assert: homeProject parent == rootProject; + assert: rootProject isMVC. + + "Set home project name and clean up change sets" + homeProject changeSet clear; name: 'The home project'. + activeChangeSets := Project allSubInstances collect: [:e | e changeSet]. + ChangeSet allInstances + select: [ :cs | (activeChangeSets includes: cs) not ] + thenDo: [:cs | cs name: nil]. + ChangeSet gatherChangeSets. + ! - assert: rootProject isMVC.!

1 0

The Trunk: ReleaseBuilder-fn.205.mcz
by commits＠source.squeak.org 25 Feb '20

25 Feb '20

Fabio Niephaus uploaded a new version of ReleaseBuilder to project The Trunk: http://source.squeak.org/trunk/ReleaseBuilder-fn.205.mcz ==================== Summary ==================== Name: ReleaseBuilder-fn.205 Author: fn Time: 25 February 2020, 3:28:27.155422 pm UUID: 58d377fb-0bb4-4d83-b03d-2febf2e4b6fe Ancestors: ReleaseBuilder-mt.204 Bump the image version to Squeak5.3rc1. =============== Diff against ReleaseBuilder-mt.204 =============== Item was changed: ----- Method: ReleaseBuilder class>>initialize (in category 'class initialization') ----- initialize QAndA ifNil: [self clearQAndA]. "We have to be after AutoStart so that Morphic is up and running." Smalltalk addToStartUpList: ReleaseBuilder after: AutoStart. + SystemVersion newVersion: 'Squeak5.3rc1'! - SystemVersion newVersion: 'Squeak5.3beta'!

2 1

The Trunk: ST80-mt.248.mcz
by commits＠source.squeak.org 25 Feb '20

25 Feb '20

Marcel Taeumel uploaded a new version of ST80 to project The Trunk: http://source.squeak.org/trunk/ST80-mt.248.mcz ==================== Summary ==================== Name: ST80-mt.248 Author: mt Time: 25 February 2020, 3:12:26.773399 pm UUID: 17a7a172-a0e4-fa46-89c9-da27f537f779 Ancestors: ST80-mt.247 Fixes an issue with debugging a process at hand, which is used when entering MVC as recovery for Morphic. Example: "[ 3 + 4 ] newProcess debug". After this fix, the strange re-draw glitches are gone. BUT, the debugger opens only after, for example, opening the world menu once. That's related to #addDeferredUIMessage: and not having the right controller at hand in #enterForEmergencyRecovery. Not that important for 5.3. =============== Diff against ST80-mt.247 =============== Item was changed: ----- Method: MVCDebugger class>>openOn:context:label:contents:fullView: (in category 'opening') ----- openOn: processToDebug context: context label: title contents: contentsStringOrNil fullView: full "Open a notifier in response to an error, halt, or notify. A notifier view just shows a short view of the sender stack and provides a menu that lets the user open a full debugger." | debugger cm ac acp wasActive | cm := Project current world. "controller manager" ac := cm activeController. acp := cm activeControllerProcess. "the ui process" wasActive := cm inActiveControllerProcess. debugger := self new process: processToDebug "Keep track of the controller if it matches." controller: (acp == processToDebug ifTrue: [ac]) context: context. full ifTrue: [debugger openFullNoSuspendLabel: title] ifFalse: [debugger openNotifierNoSuspendContents: contentsStringOrNil label: title]. "Try drawing the debugger tool at least once to avoid freeze." Project current restoreDisplay. + "If we are in a helper process, #openNoTerminate WILL NOT activate the debugger's controller. Example: user-interrupt request (cmd+dot)." - "If we are in a helper process, #openNoTerminate WILL NOT activate the debugger's controller." (acp == processToDebug and: [wasActive not]) ifTrue: [ [cm searchForActiveController] fork ]. + "Be sure to suspend the process we want to debug now." processToDebug suspend. + + "If we are NOT in a helper process, #openNoTerminate WILL NOT terminate the active controller's process." + (acp ~~ processToDebug and: [wasActive]) + ifTrue: [ Processor terminateActive ]. "Get here only if active process is not the process-to-debug. Use helper process if you want to access this return value." ^ debugger!

1 0

The Inbox: System-kks.1136.mcz
by commits＠source.squeak.org 25 Feb '20

25 Feb '20

A new version of System was added to project The Inbox: http://source.squeak.org/inbox/System-kks.1136.mcz ==================== Summary ==================== Name: System-kks.1136 Author: kks Time: 25 February 2020, 3:28:15.292038 pm UUID: 80979771-3788-4b92-a2f7-8ec50348f4f6 Ancestors: System-mt.1135 Eliminate infinite dialog loop while seeking author's initials. =============== Diff against System-mt.1135 =============== Item was changed: ----- Method: Utilities class>>authorInitials (in category 'identification') ----- authorInitials "Answer the initials to be used to identify the current code author. " + AuthorInitials ifEmpty: [self setAuthorInitials]. - [AuthorInitials isEmpty] whileTrue: [self setAuthorInitials]. ^ AuthorInitials!

1 0

The Trunk: Morphic-mt.1629.mcz
by commits＠source.squeak.org 25 Feb '20

25 Feb '20

Marcel Taeumel uploaded a new version of Morphic to project The Trunk: http://source.squeak.org/trunk/Morphic-mt.1629.mcz ==================== Summary ==================== Name: Morphic-mt.1629 Author: mt Time: 25 February 2020, 10:55:43.167652 am UUID: 0f5dc08d-6d29-5349-b800-9c5cfca860f1 Ancestors: Morphic-mt.1628 Fixes a minor regression with the window title font after UI theme changes. Note that one could have swapped #setDefaultParamters and #replaceBoxes in #applyUserInterfaceTheme (as suggested by ct), BUT #replaceBoxes reads more specific than #setDefaultParameters, so I put it first. Also, the order of those calls should not make a difference. =============== Diff against Morphic-mt.1628 =============== Item was changed: ----- Method: SystemWindow>>initializeLabelArea (in category 'initialization') ----- initializeLabelArea "Initialize the label area (titlebar) for the window." labelString ifNil: [labelString := 'Untitled Window']. + label := StringMorph new + contents: labelString; + font: (self userInterfaceTheme titleFont ifNil: [TextStyle defaultFont]); + yourself. - label := StringMorph new contents: labelString. "Add collapse box so #labelHeight will work" collapseBox := self createCollapseBox. stripes := Array with: (RectangleMorph newBounds: bounds) with: (RectangleMorph newBounds: bounds). "see extent:" self addLabelArea. self setLabelWidgetAllowance. self addCloseBox. self class moveMenuButtonRight ifTrue: [self addLabel. self addMenuControl] ifFalse: [self addMenuControl. self addLabel]. self addExpandBox. labelArea addMorphBack: collapseBox. self setFramesForLabelArea. Preferences noviceMode ifTrue: [closeBox ifNotNil: [closeBox setBalloonText: 'close window']. menuBox ifNotNil: [menuBox setBalloonText: 'window menu']. collapseBox ifNotNil: [collapseBox setBalloonText: 'collapse/expand window']]. !

1 0

The Trunk: Tools-mt.941.mcz
by commits＠source.squeak.org 25 Feb '20

25 Feb '20

Marcel Taeumel uploaded a new version of Tools to project The Trunk: http://source.squeak.org/trunk/Tools-mt.941.mcz ==================== Summary ==================== Name: Tools-mt.941 Author: mt Time: 25 February 2020, 10:39:12.128786 am UUID: 51495436-fb80-0546-be9e-703c956315eb Ancestors: Tools-mt.940 Complements Kernel-mt.1305. Fixes class-rename issue, which occurred due to catching ProgressNotification. And the missing #resume. =============== Diff against Tools-mt.940 =============== Item was changed: ----- Method: Browser>>renameClass (in category 'class functions') ----- renameClass | oldName newName obs oldBinding | self hasClassSelected ifFalse: [^ self]. self okToChange ifFalse: [^ self]. oldName := self selectedClass name. newName := self request: 'Please type new class name' initialAnswer: oldName. newName = '' ifTrue: [^ self]. "Cancel returns ''" newName := newName asSymbol. newName = oldName ifTrue: [^ self]. (self selectedClass environment includesKey: newName) ifTrue: [^ self error: newName , ' already exists']. oldBinding := self selectedClass environment declarationOf: oldName. [self selectedClass rename: newName] + on: RemarkNotification + do: [:ex | self inform: ex messageText. ex resume]. - on: Notification - do: [:ex | self inform: ex messageText]. selectedClassName := newName. self changed: #classList. obs := self systemNavigation allCallsOn: oldBinding. obs isEmpty ifFalse: [self systemNavigation browseMessageList: obs name: 'Obsolete References to ' , oldName autoSelect: oldName]. self selectClassNamed: newName.!

1 0

The Trunk: Kernel-mt.1305.mcz
by commits＠source.squeak.org 25 Feb '20

25 Feb '20

Marcel Taeumel uploaded a new version of Kernel to project The Trunk: http://source.squeak.org/trunk/Kernel-mt.1305.mcz ==================== Summary ==================== Name: Kernel-mt.1305 Author: mt Time: 25 February 2020, 10:37:58.980786 am UUID: 46b30358-e624-b44e-a36d-b6775af60202 Ancestors: Kernel-mt.1304 Fixes class-rename issue. We need a name! Voting time is now: - RemarkNotification - LoggingNotification - CommentNotification - NoticeNotification (???) - [You idea goes here.] =============== Diff against Kernel-mt.1304 =============== Item was changed: ----- Method: Class>>rename: (in category 'class name') ----- rename: aString "The new name of the receiver is the argument, aString." | oldName newName | (newName := aString asSymbol) = (oldName := self name) ifTrue: [^ self]. (self environment includesKey: newName) ifTrue: [^ self error: newName , ' already exists']. ((self environment undeclared includesKey: newName) and: [(self environment undeclared unreferencedKeys includes: newName) not]) + ifTrue: [RemarkNotification signal: 'There are references to ' , aString printString , ' - ifTrue: [Notification signal: 'There are references to ' , aString printString , ' from Undeclared. Check them after this change.']. name := newName. self environment renameClass: self from: oldName! Item was added: + Notification subclass: #RemarkNotification + instanceVariableNames: '' + classVariableNames: '' + poolDictionaries: '' + category: 'Kernel-Exceptions'! Item was added: + ----- Method: RemarkNotification>>defaultAction (in category 'priv handling') ----- + defaultAction + + Transcript showln: self messageText.!

1 0

The Trunk: MorphicTests-mt.60.mcz
by commits＠source.squeak.org 25 Feb '20

25 Feb '20

Marcel Taeumel uploaded a new version of MorphicTests to project The Trunk: http://source.squeak.org/trunk/MorphicTests-mt.60.mcz ==================== Summary ==================== Name: MorphicTests-mt.60 Author: mt Time: 25 February 2020, 9:36:17.460786 am UUID: a5eee205-38f4-f848-abb3-0c4b3567329b Ancestors: MorphicTests-mt.59 We did not find a working fix for that bug. =============== Diff against MorphicTests-mt.59 =============== Item was added: + ----- Method: TextAnchorTest>>expectedFailures (in category 'failures') ----- + expectedFailures + + ^ #(testResizeAnchoredMorph)!

1 0

← Newer
1
...
7
8
9
10
11
12
13
...
31
Older →

Jump to page: