Squeak-dev August 2020

squeak-dev@lists.squeakfoundation.org

47 participants
168 discussions

DoItFirst updates (for command option handling early in Squeak image startUp processing)
by David T. Lewis 07 Aug '20

07 Aug '20

I have added a couple of enhancements to DoItFirst. The -noinit option disables file and directory initialization to force a bare minimum of startup initialization. The -debug option provides a debugger halt at the earliest feasible point in the startup processing. To install: (Installer ss project: 'DoItFirst') package: 'DoItFirst-System-Support'; install DoItFirst image arguments: -doit argumentlist "evaluate each argument as a doIt expression" -evaluate arg "evaluate arg, print result then exit" -filein filelist "file in each file named in fileList" -cwd path "set FileDirectory defaultDirectory to path prior to evaluating other options" -debug "enter a debugger as soon as possible in the startUp processing" -noinit "mimimal initiialization, suppress file and directory startUp processing when evaluating options" -help "print this message" To make this work, call DoItFirst reevaluateDebug from Delay class>>startUp and call DoItFirst reevaluateCwd from FileDirectory class>>startUp Dave

1 0

[CRON] Errored: squeak-smalltalk/squeak-app#1784 (squeak-trunk - 25ebaf1)
by Travis CI 06 Aug '20

06 Aug '20

Build Update for squeak-smalltalk/squeak-app ------------------------------------- Build: #1784 Status: Errored Duration: 17 mins and 33 secs Commit: 25ebaf1 (squeak-trunk) Author: Marcel Taeumel Message: Hi all! The project "squeak-app" is part of the continuous build infrastructure (short: CI) for Squeak's bundles, which you can download at https://files.squeak.org/, followed by the version tag you are looking for. All bundles are updated on a regular basis, which is daily for Trunk (i.e. the current alpha version) and monthly for release versions. Note that there won't be new bundles if Squeak's build number, which reflects in-image code updates, did not change between CI jobs. -- The Squeak Oversight Board [ci skip] View the changeset: https://github.com/squeak-smalltalk/squeak-app/compare/fb55517f583fe544f922… View the full build log and details: https://travis-ci.org/github/squeak-smalltalk/squeak-app/builds/715519334?u… -- You can unsubscribe from build emails from the squeak-smalltalk/squeak-app repository going to https://travis-ci.org/account/preferences/unsubscribe?repository=8901856&ut…. Or unsubscribe from *all* email updating your settings at https://travis-ci.org/account/preferences/unsubscribe?utm_medium=notificati…. Or configure specific recipients for build notifications in your .travis.yml file. See https://docs.travis-ci.com/user/notifications.

1 0

The Trunk: Collections-mt.906.mcz
by commits＠source.squeak.org 06 Aug '20

06 Aug '20

Marcel Taeumel uploaded a new version of Collections to project The Trunk: http://source.squeak.org/trunk/Collections-mt.906.mcz ==================== Summary ==================== Name: Collections-mt.906 Author: mt Time: 6 August 2020, 10:09:38.701052 am UUID: 97d0d39c-6fe1-914b-bb0b-6a1b9a2b9715 Ancestors: Collections-eem.905 Adds shortcuts for remove/replace text attributes using a predicate. =============== Diff against Collections-eem.905 =============== Item was added: + ----- Method: Text>>removeAttributesThat: (in category 'converting') ----- + removeAttributesThat: removalBlock + "Enumerate all attributes in the receiver. Remove those passing removalBlock." + + self + removeAttributesThat: removalBlock + replaceAttributesThat: [:att | false] + by: nil.! Item was added: + ----- Method: Text>>replaceAttributesThat:by: (in category 'converting') ----- + replaceAttributesThat: replaceBlock by: convertBlock + "Enumerate all attributes in the receiver. Replace those passing replaceBlock after converting it through convertBlock." + + self + removeAttributesThat: [:att | false] + replaceAttributesThat: replaceBlock + by: convertBlock.!

1 0

The Inbox: Installer-Core-tcj.440.mcz
by commits＠source.squeak.org 06 Aug '20

06 Aug '20

A new version of Installer-Core was added to project The Inbox: http://source.squeak.org/inbox/Installer-Core-tcj.440.mcz ==================== Summary ==================== Name: Installer-Core-tcj.440 Author: tcj Time: 5 August 2020, 10:21:54.954624 pm UUID: b6ac0eda-4db6-4313-b760-50dcdd1dc584 Ancestors: Installer-Core-mt.439 Be more tolerant of a partially-installed or mis-installed Metacello. =============== Diff against Installer-Core-mt.439 =============== Item was changed: ----- Method: Installer class>>ensureRecentMetacello (in category 'scripts') ----- ensureRecentMetacello "Copied and adapted from https://github.com/Metacello/metacello/blob/master/README.md" | metacello | ((Smalltalk classNamed: #WebClient) ifNil: [ false ] ifNotNil: [ :webClient | [ (webClient httpHead: 'https://github.com') isSuccess ] on: Error do: [ false ] ]) ifFalse: [ ^self inform: 'Could not connect to "https://github.com".\\You need an internet connection and SSL support\to install (or update) Metacello.\\Please fix those issues and try again.' translated withCRs ]. self isMetacelloInstalled ifFalse: [ "Prepare a clean environment for it." + Smalltalk globals removeKey: #Metacello ifAbsent: []. - Smalltalk globals removeKey: #Metacello. "Get the Metacello configuration (for Squeak users)" Installer gemsource project: 'metacello'; addPackage: 'ConfigurationOfMetacello'; install. "Bootstrap Metacello Preview, using mcz files (#'previewBootstrap' symbolic version" ((Smalltalk classNamed: #ConfigurationOfMetacello) project version: #'previewBootstrap') load]. metacello := Smalltalk classNamed: #Metacello. "Now load latest version of Metacello" metacello new baseline: 'Metacello'; repository: 'github://Metacello/metacello:master/repository'; get. metacello new baseline: 'Metacello'; repository: 'github://Metacello/metacello:master/repository'; load: #('default' 'Metacello-Help'). ! Item was changed: ----- Method: Installer class>>isMetacelloInstalled (in category 'scripts') ----- isMetacelloInstalled + "Squeak is shipped with the global #Metacello referring to lightweight MetacelloStub. After the first message is sent, the latest Metacello is installed, replacing the stub. + Be tolerant of a partially-installed Metacello." + ^ (Smalltalk includesKey: #Metacello) + and: [(Smalltalk at: #Metacello) ~= MetacelloStub]! - "Squeak is shipped with the global #Metacello referring to lightweight MetacelloStub. After the first message is sent, the latest Metacello is installed, replacing the stub." - ^ (Smalltalk at: #Metacello) ~= MetacelloStub!

2 1

[CRON] Errored: squeak-smalltalk/squeak-app#1783 (squeak-trunk - 25ebaf1)
by Travis CI 05 Aug '20

05 Aug '20

Build Update for squeak-smalltalk/squeak-app ------------------------------------- Build: #1783 Status: Errored Duration: 17 mins and 50 secs Commit: 25ebaf1 (squeak-trunk) Author: Marcel Taeumel Message: Hi all! The project "squeak-app" is part of the continuous build infrastructure (short: CI) for Squeak's bundles, which you can download at https://files.squeak.org/, followed by the version tag you are looking for. All bundles are updated on a regular basis, which is daily for Trunk (i.e. the current alpha version) and monthly for release versions. Note that there won't be new bundles if Squeak's build number, which reflects in-image code updates, did not change between CI jobs. -- The Squeak Oversight Board [ci skip] View the changeset: https://github.com/squeak-smalltalk/squeak-app/compare/fb55517f583fe544f922… View the full build log and details: https://travis-ci.org/github/squeak-smalltalk/squeak-app/builds/715170273?u… -- You can unsubscribe from build emails from the squeak-smalltalk/squeak-app repository going to https://travis-ci.org/account/preferences/unsubscribe?repository=8901856&ut…. Or unsubscribe from *all* email updating your settings at https://travis-ci.org/account/preferences/unsubscribe?utm_medium=notificati…. Or configure specific recipients for build notifications in your .travis.yml file. See https://docs.travis-ci.com/user/notifications.

1 0

TrueTypeFont and Unicode Characters
by Eric Gade 05 Aug '20

05 Aug '20

Hello, I am trying to load a particular TrueTypeFont that represents the Cuneiform signs in the Cuneiform Unicode block. You can find some information on this page <https://www.hethport.uni-wuerzburg.de/cuneifont/>. Specifically, I'm attempting to work with the Neo-Assyrian font on that page ('Assurbanipal.ttf' in the zip file). I have also tried the Old Babylonian fonts with similar results. I have "imported" this font using the FileList tool and it does appear as a TextStyle. However, if I attempt to run: ``` m := TextMorph new beAllFont: ((TextStyle named: 'Assurbanipal') fontOfSize: 36); backgroundColor: Color white. signString := (Unicode value: 16r12038) asString. m contents: signString. m openInHand. ``` I get a TextMorph that appears blank. Either I am doing something incorrectly or the system cannot render the glyph at that code point (which should be the sign "AŠ"). Any ideas? -- Eric

5 9

Squeak6.0 alpha, install, add additional stuff--Metacello, Git, OSProcess, Grift, Malfeascance, etc fails due to smaltalkhub be bye-bye
by gettimothy 05 Aug '20

05 Aug '20

Hi folks, This probably holds for 5.3 install too. In the preferences wizard, the extras stuff, the Install Metacello ... hangs at "Updating http://smalltalkhub.com/foo/bar/metacello/main" iirc, from the pharo discord, SmalltalkHub is going away. You will probably need a different repo. cordially, tty

6 8

[CRON] Errored: squeak-smalltalk/squeak-app#1782 (squeak-trunk - 25ebaf1)
by Travis CI 04 Aug '20

04 Aug '20

Build Update for squeak-smalltalk/squeak-app ------------------------------------- Build: #1782 Status: Errored Duration: 17 mins and 36 secs Commit: 25ebaf1 (squeak-trunk) Author: Marcel Taeumel Message: Hi all! The project "squeak-app" is part of the continuous build infrastructure (short: CI) for Squeak's bundles, which you can download at https://files.squeak.org/, followed by the version tag you are looking for. All bundles are updated on a regular basis, which is daily for Trunk (i.e. the current alpha version) and monthly for release versions. Note that there won't be new bundles if Squeak's build number, which reflects in-image code updates, did not change between CI jobs. -- The Squeak Oversight Board [ci skip] View the changeset: https://github.com/squeak-smalltalk/squeak-app/compare/fb55517f583fe544f922… View the full build log and details: https://travis-ci.org/github/squeak-smalltalk/squeak-app/builds/714824982?u… -- You can unsubscribe from build emails from the squeak-smalltalk/squeak-app repository going to https://travis-ci.org/account/preferences/unsubscribe?repository=8901856&ut…. Or unsubscribe from *all* email updating your settings at https://travis-ci.org/account/preferences/unsubscribe?utm_medium=notificati…. Or configure specific recipients for build notifications in your .travis.yml file. See https://docs.travis-ci.com/user/notifications.

1 0

The Trunk: ToolsTests-mt.98.mcz
by commits＠source.squeak.org 04 Aug '20

04 Aug '20

Marcel Taeumel uploaded a new version of ToolsTests to project The Trunk: http://source.squeak.org/trunk/ToolsTests-mt.98.mcz ==================== Summary ==================== Name: ToolsTests-mt.98 Author: mt Time: 4 August 2020, 10:52:30.205047 am UUID: c6795330-9d71-bd41-811f-76dec78f8ef6 Ancestors: ToolsTests-mt.97 Based on KernelTests-tcj.350 (inbox -> treated), add a test to check whether all menu actions are actually implemented in either model or widget. Currently works for model's code-pane menus only. Test design requires agreement on communication between model and builder such as through #buildCodePaneWith:. Not yet working for MVCToolBuilder. We do need to harmonize the interfaces of MenuMorph (Morphic) and PopUpMenu (MVC), e.g., by adding #items. Not yet passing for MorphicToolBuilder bc. missing implementation of #makeProjectLink in either CodeHolder or PluggableTextMorph. :-) =============== Diff against ToolsTests-mt.97 =============== Item was changed: SystemOrganization addCategory: #'ToolsTests-Browser'! SystemOrganization addCategory: #'ToolsTests-Debugger'! SystemOrganization addCategory: #'ToolsTests-FileList'! SystemOrganization addCategory: #'ToolsTests-Inspector'! + SystemOrganization addCategory: #'ToolsTests-Menus'! Item was added: + TestCase subclass: #ToolMenusTest + instanceVariableNames: '' + classVariableNames: '' + poolDictionaries: '' + category: 'ToolsTests-Menus'! Item was added: + ----- Method: ToolMenusTest>>testCodePaneMenu (in category 'tests') ----- + testCodePaneMenu + "Checks whether all menu actions are implemented in either the model or the widget." + + | builder builderSelector menuSelector result | + builder := ToolBuilder default. + builderSelector := #buildCodePaneWith:. + menuSelector := #menu. + result := Dictionary new. + + Model withAllSubclasses + select: [:modelClass | modelClass includesSelector: builderSelector] + thenDo: [:modelClass | + | model spec widget menu selectors | + result at: modelClass put: OrderedCollection new. + model := modelClass new. + spec := model perform: builderSelector with: builder. + (spec respondsTo: menuSelector) ifFalse: [ + "Little hack to allow code panes being wrapped in panels." + spec := spec children detect: [:child | + (child respondsTo: menuSelector) and: [(child perform: menuSelector) notNil]]]. + [widget := builder build: spec] on: Error do: [:ex | ex resume: nil]. + #(false true) do: [:shifted | + menu := builder build: (builder pluggableMenuSpec new items; yourself). + menu := model perform: spec menu withEnoughArguments: {menu. shifted}. + selectors := menu items collect: [:item | item selector]. + "MVC: selectors := menu selections select: [:sel | sel isSymbol]" + (result at: modelClass) + addAll: (selectors reject: [:selector | + (model respondsTo: selector) or: [widget respondsTo: selector]])]]. + + self assert: (result values allSatisfy: [:notImplementedSelectors | notImplementedSelectors isEmpty]).!

3 4

The Inbox: System-tcj.1168.mcz
by commits＠source.squeak.org 04 Aug '20

04 Aug '20

A new version of System was added to project The Inbox: http://source.squeak.org/inbox/System-tcj.1168.mcz ==================== Summary ==================== Name: System-tcj.1168 Author: tcj Time: 3 August 2020, 11:04:33.580572 pm UUID: 18b27ffd-6134-4a71-be76-a012d1b21b2e Ancestors: System-mt.1167 Remove stale preferences from Flash support which no longer lives in the image. Needs this accompanying change to the postscript of System package: #( compressFlashImages extractFlashInHighQuality extractFlashInHighestQuality ) do: [:pref | Preferences removePreference: pref ] =============== Diff against System-mt.1167 =============== Item was changed: ----- Method: Preferences class>>defaultValueTableForCurrentRelease (in category 'defaults') ----- defaultValueTableForCurrentRelease "Answer a table defining default values for all the preferences in the release. Returns a list of (pref-symbol, boolean-symbol) pairs" ^ #( (abbreviatedBrowserButtons false) (alternativeBrowseIt false) (annotationPanes false) (areaFillsAreTolerant false) (areaFillsAreVeryTolerant false) (automaticFlapLayout true) (automaticKeyGeneration false) (automaticPlatformSettings true) (automaticViewerPlacement true) (balloonHelpEnabled true) (balloonHelpInMessageLists false) (batchPenTrails false) (capitalizedReferences true) (caseSensitiveFinds false) (cautionBeforeClosing false) (changeSetVersionNumbers true) (checkForSlips true) (checkForUnsavedProjects true) (classicNavigatorEnabled false) (cmdDotEnabled true) (collapseWindowsInPlace false) (compactViewerFlaps false) - (compressFlashImages false) (confirmFirstUseOfStyle true) (conversionMethodsAtFileOut false) (debugHaloHandle true) (debugPrintSpaceLog false) (debugShowDamage false) (decorateBrowserButtons true) (diffsInChangeList true) (diffsWithPrettyPrint false) (dismissAllOnOptionClose false) (dragNDropWithAnimation false) (eToyFriendly false) (eToyLoginEnabled false) (enableLocalSave true) - (extractFlashInHighQuality true) - (extractFlashInHighestQuality false) (fastDragWindowForMorphic true) (fenceEnabled true) (fullScreenLeavesDeskMargins true) (haloTransitions false) (higherPerformance false) (honorDesktopCmdKeys true) (includeSoundControlInNavigator false) (infiniteUndo false) (logDebuggerStackToFile true) (magicHalos false) (menuButtonInToolPane false) (menuColorFromWorld false) (menuKeyboardControl false) (modalColorPickers true) (mouseOverForKeyboardFocus false) (mouseOverHalos false) (mvcProjectsAllowed true) (navigatorOnLeftEdge true) (noviceMode false) (okToReinitializeFlaps true) (optionalButtons true) (passwordsOnPublish false) (personalizedWorldMenu true) (postscriptStoredAsEPS false) (projectViewsInWindows true) (projectZoom true) (projectsSentToDisk false) (propertySheetFromHalo false) (readDocumentAtStartup true) (restartAlsoProceeds false) (reverseWindowStagger true) (roundedMenuCorners true) (scrollBarsNarrow false) (scrollBarsOnRight true) (securityChecksEnabled false) (selectiveHalos false) (showBoundsInHalo false) (showDirectionForSketches false) (showDirectionHandles false) (showFlapsWhenPublishing false) (showProjectNavigator false) (showSecurityStatus true) (showSharedFlaps true) (signProjectFiles true) (simpleMenus false) (smartUpdating true) (startInUntrustedDirectory false) (systemWindowEmbedOK false) (tileTranslucentDrag true) (timeStampsInMenuTitles true) (turnOffPowerManager false) (twentyFourHourFileStamps true) (typeCheckingInTileScripting true) (uniTilesClassic true) (uniqueNamesInHalos false) (universalTiles false) (unlimitedPaintArea false) (useButtonPropertiesToFire false) (useUndo true) (viewersInFlaps true) (warnAboutInsecureContent true) (warnIfNoChangesFile true) (warnIfNoSourcesFile true)) " Preferences defaultValueTableForCurrentRelease do: [:pair | (Preferences preferenceAt: pair first ifAbsent: [nil]) ifNotNilDo: [:pref | pref defaultValue: (pair last == true)]]. Preferences chooseInitialSettings. "!

1 0

Jump to page: