Squeak-dev April 2015

squeak-dev@lists.squeakfoundation.org

38 participants
642 discussions

The Trunk: System-kfr.727.mcz
by commits＠source.squeak.org 28 Apr '15

28 Apr '15

Karl Ramberg uploaded a new version of System to project The Trunk: http://source.squeak.org/trunk/System-kfr.727.mcz ==================== Summary ==================== Name: System-kfr.727 Author: kfr Time: 28 April 2015, 9:03:51.579 am UUID: 7c559cd7-95ba-bc4b-bfd6-da1a7e0a4dff Ancestors: System-kfr.726 Missing method for loading preferences =============== Diff against System-kfr.726 =============== Item was added: + ----- Method: Preferences class>>restorePreferencesFromDisk: (in category 'personalization') ----- + restorePreferencesFromDisk: aFile + Cursor wait + showWhile: [[self loadPreferencesFrom: aFile] + on: Error + do: [:ex | self inform: 'there was an error restoring the preferences' translated]]!

1 0

Code font in input fields?
by Marcel Taeumel 28 Apr '15

28 Apr '15

Hey -- I noticed that we use the code font in one-line input fields by default. This makes sense in the search bar, but everywhere else? What's your opinion? :) Best, Marcel -- View this message in context: http://forum.world.st/Code-font-in-input-fields-tp4822352.html Sent from the Squeak - Dev mailing list archive at Nabble.com.

2 1

The Trunk: System-kfr.726.mcz
by commits＠source.squeak.org 28 Apr '15

28 Apr '15

Karl Ramberg uploaded a new version of System to project The Trunk: http://source.squeak.org/trunk/System-kfr.726.mcz ==================== Summary ==================== Name: System-kfr.726 Author: kfr Time: 28 April 2015, 8:53:41.096 am UUID: a075e8a8-c4bd-d84a-8d18-5cf590262626 Ancestors: System-cmm.725 Register fileService for *.pref. Preferences can now be loaded from FileList =============== Diff against System-cmm.725 =============== Item was added: + ----- Method: Preferences class>>fileReaderServicesForFile:suffix: (in category 'file list services') ----- + fileReaderServicesForFile: fullName suffix: suffix + ^(suffix = 'prefs') | (suffix = '*') + ifTrue: [ self services ] + ifFalse: [ #() ]! Item was changed: ----- Method: Preferences class>>loadPreferencesFrom: (in category 'personalization') ----- + loadPreferencesFrom: aFile - loadPreferencesFrom: aFileName | stream params dict desktopColor | + stream := ReferenceStream fileNamed: aFile. - stream := ReferenceStream fileNamed: aFileName. params := stream next. self assert: (params isKindOf: IdentityDictionary). params removeKey: #PersonalDictionaryOfPreferences. dict := stream next. self assert: (dict isKindOf: IdentityDictionary). desktopColor := stream next. stream close. dict keysAndValuesDo: [:key :value | (self preferenceAt: key ifAbsent: [nil]) ifNotNil: [:pref | pref preferenceValue: value preferenceValue]]. params keysAndValuesDo: [ :key :value | self setParameter: key to: value ]. Smalltalk isMorphic ifTrue: [ World fillStyle: desktopColor ] ifFalse: [ self desktopColor: desktopColor. ScheduledControllers updateGray ]. ! Item was added: + ----- Method: Preferences class>>serviceLoadPreferencesFromDisk (in category 'file list services') ----- + serviceLoadPreferencesFromDisk + ^ SimpleServiceEntry + provider: self + label: 'load preferences from a saved file' + selector: #restorePreferencesFromDisk: + description: 'restore all saved personal preference settings' + buttonLabel: 'load preferences'! Item was added: + ----- Method: Preferences class>>services (in category 'file list services') ----- + services + ^ Array with: self serviceLoadPreferencesFromDisk!

1 0

The Trunk: Morphic-mt.944.mcz
by commits＠source.squeak.org 28 Apr '15

28 Apr '15

Marcel Taeumel uploaded a new version of Morphic to project The Trunk: http://source.squeak.org/trunk/Morphic-mt.944.mcz ==================== Summary ==================== Name: Morphic-mt.944 Author: mt Time: 28 April 2015, 8:01:55.694 am UUID: d8d3d098-6144-6847-b45d-f0635dee2269 Ancestors: Morphic-mt.943 Small cosmetic fix for visual wrap border. Respects margins of textMorph now. Colors a little bit more friendly. =============== Diff against Morphic-mt.943 =============== Item was changed: ----- Method: PluggableTextMorph>>drawOverlayOn: (in category 'drawing') ----- drawOverlayOn: aCanvas "Draw frame adornments on top of everything otherwise they will partially overlap with text selection which looks ugly." - super drawOverlayOn: aCanvas. self drawWrapBorderOn: aCanvas. + super drawOverlayOn: aCanvas. self drawFrameAdornmentsOn: aCanvas. ! Item was changed: ----- Method: PluggableTextMorph>>drawWrapBorderOn: (in category 'drawing') ----- drawWrapBorderOn: aCanvas | offset rect | self wantsWrapBorder ifFalse: [^ self]. textMorph ifNil: [^ self]. + offset := textMorph margins isRectangle + ifTrue: [textMorph margins left] + ifFalse: [textMorph margins isPoint + ifTrue: [textMorph margins x] + ifFalse: [textMorph margins]]. + offset := offset + ((textMorph textStyle defaultFont widthOf: $x) * self class visualWrapBorderLimit). - offset := (textMorph textStyle defaultFont widthOf: $x) * self class visualWrapBorderLimit. offset > self width ifTrue: [^ self]. rect := scroller topLeft + (offset @ 0) corner: scroller bottomRight. aCanvas fillRectangle: rect color: (self borderStyle color muchLighter alpha: 0.3). aCanvas line: rect topLeft to: rect bottomLeft width: self borderStyle width + color: (self borderStyle color alpha: 0.5).! - color: self borderStyle color.!

1 0

The Trunk: System.spur-kfr.725.mcz
by commits＠source.squeak.org 28 Apr '15

28 Apr '15

Karl Ramberg uploaded a new version of System to project The Trunk: http://source.squeak.org/trunk/System.spur-kfr.725.mcz ==================== Summary ==================== Name: System.spur-kfr.725 Author: kfr Time: 28 April 2015, 7:31:43.891 am UUID: 56df7b80-d8e2-9945-8286-501a5fff02a4 Ancestors: System.spur-eem.709, System.spur-eem.712, System.spur-topa.718, System.spur-mt.724 Register fileService for *.pref. Preferences can now be loaded from FileList =============== Diff against System.spur-eem.709 =============== Item was added: + ----- Method: Preferences class>>fileReaderServicesForFile:suffix: (in category 'file list services') ----- + fileReaderServicesForFile: fullName suffix: suffix + ^(suffix = 'prefs') | (suffix = '*') + ifTrue: [ self services ] + ifFalse: [ #() ]! Item was changed: ----- Method: Preferences class>>loadPreferencesFrom: (in category 'personalization') ----- loadPreferencesFrom: aFile | stream params dict desktopColor | + stream := ReferenceStream fileNamed: aFile. - stream := ReferenceStream on: aFile. params := stream next. self assert: (params isKindOf: IdentityDictionary). params removeKey: #PersonalDictionaryOfPreferences. dict := stream next. self assert: (dict isKindOf: IdentityDictionary). desktopColor := stream next. stream close. dict keysAndValuesDo: [:key :value | (self preferenceAt: key ifAbsent: [nil]) ifNotNil: [:pref | pref preferenceValue: value preferenceValue]]. params keysAndValuesDo: [ :key :value | self setParameter: key to: value ]. Smalltalk isMorphic ifTrue: [ World fillStyle: desktopColor ] ifFalse: [ self desktopColor: desktopColor. ScheduledControllers updateGray ]. ! Item was added: + ----- Method: Preferences class>>serviceLoadPreferencesFromDisk (in category 'file list services') ----- + serviceLoadPreferencesFromDisk + ^ SimpleServiceEntry + provider: self + label: 'load preferences from a saved file' + selector: #restorePreferencesFromDisk: + description: 'restore all saved personal preference settings' + buttonLabel: 'load preferences'! Item was added: + ----- Method: Preferences class>>services (in category 'file list services') ----- + services + ^ Array with: self serviceLoadPreferencesFromDisk!

1 0

Daily Commit Log
by commits＠source.squeak.org 27 Apr '15

27 Apr '15

Changes to Trunk (http://source.squeak.org/trunk.html) in the last 24 hours: http://lists.squeakfoundation.org/pipermail/packages/2015-April/008140.html Name: Morphic-topa.936 Ancestors: Morphic-mt.935 Refactor Font importer to lose all hard-coded pixels and use ToolBuilder better. Also, make glyph-finding more robust ============================================= http://lists.squeakfoundation.org/pipermail/packages/2015-April/008141.html Name: SUnitGUI-topa.61 Ancestors: SUnitGUI-mt.60 Lose some hard-coded pixels ============================================= http://lists.squeakfoundation.org/pipermail/packages/2015-April/008142.html Name: Tools-topa.607 Ancestors: Tools-mt.606 Lose some hard-coded pixels and make the path/pattern offset-based (not fraction-based) ============================================= http://lists.squeakfoundation.org/pipermail/packages/2015-April/008143.html Name: TrueType-topa.39 Ancestors: TrueType-topa.38 FontSet>>pointSize: Consistency with related implementations and losing hard-coded DPI ============================================= http://lists.squeakfoundation.org/pipermail/packages/2015-April/008144.html Name: Tools-cmm.608 Ancestors: Tools-topa.607 - Just display the selected system category in the window title of HierarchyBrowsers, no need for the new #showSystemCategory preference afterall. Good idea Marcel! - Inspector: do NOT send any messages to the object being inspected, not even printString, until the user says so. Essential for database apps and proxy debugging. - Fixed loss of indentation in MessageTraces after using the filtering function off the menu. ============================================= http://lists.squeakfoundation.org/pipermail/packages/2015-April/008145.html Name: ST80-dtl.182 Ancestors: ST80-cmm.181 Some tools (e.g. FontChooserTool) prefer to display text with no line wrapping. Add #wrapFlag: to PluggableTextMorph and StringHolderView to allow a tool builder to specify the preference in Morphic or MVC. ============================================= http://lists.squeakfoundation.org/pipermail/packages/2015-April/008146.html Name: Morphic-dtl.937 Ancestors: Morphic-topa.936 Some tools (e.g. FontChooserTool) prefer to display text with no line wrapping. Add #wrapFlag: to PluggableTextMorph and StringHolderView to allow a tool builder to specify the preference in Morphic or MVC. ============================================= http://lists.squeakfoundation.org/pipermail/packages/2015-April/008147.html Name: Morphic-mt.938 Ancestors: Morphic-dtl.937 Fixed text morphs to honor "autoFit but no wrapping" by resizing whenever text is modified. This added check for #isAutoFit at a critical place. Thus I converted its state to an instVar (was a morph property). Now, we can turn-off soft line wraps in the whole image if we want to. Added a preference for that. This commit includes a fix in adjustRightX in paragraph to consider the caret width, which would otherwise be invisible and the edge. ============================================= http://lists.squeakfoundation.org/pipermail/packages/2015-April/008148.html Name: ToolBuilder-Kernel-mt.83 Ancestors: ToolBuilder-Kernel-mt.82 Added configuration options for line wrapping to text spec. ============================================= http://lists.squeakfoundation.org/pipermail/packages/2015-April/008149.html Name: ToolBuilder-Morphic-mt.138 Ancestors: ToolBuilder-Morphic-mt.137 Consider configuration options for line wrapping when construction pluggable text morphs or input fields. Note: Hard wrapping not yet supported. ============================================= http://lists.squeakfoundation.org/pipermail/packages/2015-April/008150.html Name: Morphic-mt.939 Ancestors: Morphic-mt.938 Fixed Font Chooser Tool to not assume some particular implementation of their widgets. ============================================= http://lists.squeakfoundation.org/pipermail/packages/2015-April/008151.html Name: Morphic-mt.940 Ancestors: Morphic-mt.939 Fixed button height in font chooser tool. ============================================= http://lists.squeakfoundation.org/pipermail/packages/2015-April/008152.html Name: Morphic-mt.941 Ancestors: Morphic-mt.940 Honor system-wide default for line wrapping when creating a text morph. ============================================= http://lists.squeakfoundation.org/pipermail/packages/2015-April/008153.html Name: Morphic-mt.942 Ancestors: Morphic-mt.941 Fixes a bug in basic Morph layouting. Use #bounds: setter in #layoutBounds: instead of modifying the instance variable directly. Having this, submorphs that override #extent:, #position:, or #bounds: will also work in a layout. ============================================= http://lists.squeakfoundation.org/pipermail/packages/2015-April/008154.html Name: Morphic-mt.943 Ancestors: Morphic-mt.942 In conjunction with turning off the soft line wrap, we can turn on a visual border to better support manual text composition. ============================================= http://lists.squeakfoundation.org/pipermail/packages/2015-April/008155.html Name: ToolBuilder-Morphic-mt.139 Ancestors: ToolBuilder-Morphic-mt.138 Enabled visual wrap border in code panes according to preference. ============================================= http://lists.squeakfoundation.org/pipermail/packages/2015-April/008156.html Name: System-cmm.725 Ancestors: System-mt.724 - Attempting to load preferences is blowing up, fix by restoring the old one-click behavior. - Proper fix for browsing allStoresInto: SomeClassVar from: aClassOrMetaclass, so that all stores occurring in either the instance or class side will be revealed even if the browse was initiated from the class-side. =============================================

1 0

Re: The Trunk: GetText-kfr.35.mcz
by Marcel Taeumel 27 Apr '15

27 Apr '15

How to use the LanguageEditor? Best, Marcel -- View this message in context: http://forum.world.st/The-Trunk-GetText-kfr-35-mcz-tp4821914p4821924.html Sent from the Squeak - Dev mailing list archive at Nabble.com.

3 6

The Trunk: System-cmm.725.mcz
by commits＠source.squeak.org 27 Apr '15

27 Apr '15

Chris Muller uploaded a new version of System to project The Trunk: http://source.squeak.org/trunk/System-cmm.725.mcz ==================== Summary ==================== Name: System-cmm.725 Author: cmm Time: 27 April 2015, 3:20:18.66 pm UUID: b166e202-b3c3-4232-a17e-cd55a873fa50 Ancestors: System-mt.724 - Attempting to load preferences is blowing up, fix by restoring the old one-click behavior. - Proper fix for browsing allStoresInto: SomeClassVar from: aClassOrMetaclass, so that all stores occurring in either the instance or class side will be revealed even if the browse was initiated from the class-side. =============== Diff against System-mt.724 =============== Item was changed: ----- Method: Preferences class>>loadPreferencesFrom: (in category 'personalization') ----- + loadPreferencesFrom: aFileName - loadPreferencesFrom: aFile | stream params dict desktopColor | + stream := ReferenceStream fileNamed: aFileName. - stream := ReferenceStream on: aFile. params := stream next. self assert: (params isKindOf: IdentityDictionary). params removeKey: #PersonalDictionaryOfPreferences. dict := stream next. self assert: (dict isKindOf: IdentityDictionary). desktopColor := stream next. stream close. dict keysAndValuesDo: [:key :value | (self preferenceAt: key ifAbsent: [nil]) ifNotNil: [:pref | pref preferenceValue: value preferenceValue]]. params keysAndValuesDo: [ :key :value | self setParameter: key to: value ]. Smalltalk isMorphic ifTrue: [ World fillStyle: desktopColor ] ifFalse: [ self desktopColor: desktopColor. ScheduledControllers updateGray ]. ! Item was changed: ----- Method: Preferences class>>preferenceAt:ifAbsent: (in category 'preference-object access') ----- preferenceAt: aSymbol ifAbsent: aBlock "Answer the Preference object at the given symbol, or the value of aBlock if not present" + ^self accessDictionaryOfPreferencesIn: [ :dictionaryOfPreferences | + dictionaryOfPreferences at: aSymbol ifAbsent: aBlock ]! - self accessDictionaryOfPreferencesIn: [ :dictionaryOfPreferences | - dictionaryOfPreferences - at: aSymbol - ifPresent: [ :preference | ^preference ] ]. - ^aBlock value! Item was removed: - ----- Method: Preferences class>>restorePreferencesFromDisk: (in category 'personalization') ----- - restorePreferencesFromDisk: aFile - Cursor wait - showWhile: [[self loadPreferencesFrom: aFile] - on: Error - do: [:ex | self inform: 'there was an error restoring the preferences' translated]]! Item was changed: ----- Method: Preferences class>>storePreferencesToDisk (in category 'personalization') ----- storePreferencesToDisk + Cursor wait showWhile: [ + [ self storePreferencesIn: 'my.prefs' ] on: Error do: [ :ex | self inform: 'there was an error storing your preferences to disk' ]]! - | newName | - newName := UIManager default request: 'Please confirm name for save...' initialAnswer: 'myPreferences'. - newName isEmpty - ifTrue: [^ self]. - Cursor wait - showWhile: [[self storePreferencesIn: newName , '.prefs'] - on: Error - do: [:ex | self inform: 'there was an error storing your preferences to disk. you probably already have stored your preferences' translated]]! Item was changed: ----- Method: SystemNavigation>>allStoresInto:from: (in category 'query') ----- allStoresInto: varName from: aClass "Answer a sequence of MewthodReferences for all the receiver's methods or any methods of a subclass/superclass that assign to the instance variable name." "self new allStoresInto: 'contents' from: Collection." | result roots | result := OrderedCollection new. (aClass theNonMetaClass inheritsFrom: SharedPool) ifTrue: [roots := self allClasses select: [:class| class sharedPools includes: aClass theNonMetaClass]. roots do: [:root| root withAllSubclassesDo: [:class| (class whichMethodsStoreInto: varName), (class class whichMethodsStoreInto: varName) do: [:eachMethod| result add: eachMethod methodReference]]]]. aClass withAllSubAndSuperclassesDo: [ : class | + (class theNonMetaClass whichMethodsStoreInto: varName), + (class theMetaClass whichMethodsStoreInto: varName) do: - (class whichMethodsStoreInto: varName), - (class class whichMethodsStoreInto: varName) do: [ : eachMethod | result add: eachMethod methodReference ] ]. ^result! Item was changed: ----- Method: SystemNavigation>>browseAllStoresInto:from: (in category 'browse') ----- + browseAllStoresInto: varName from: aClass - browseAllStoresInto: varName from: aClass "Create and schedule a Message Set browser for all the receiver's methods or any methods of a subclass/superclass that refer to the instance variable name." "self new browseAllStoresInto: 'contents' from: Collection." ^ self + browseMessageList: (self allStoresInto: varName from: aClass) - browseMessageList: - (self - allStoresInto: varName - from: aClass) , - ((aClass allClassVarNames includes: varName) - ifTrue: - [ self - allStoresInto: varName - from: aClass class ] - ifFalse: [ Array empty ]) name: 'Stores into ' , varName autoSelect: varName!

1 0

4.6 release update
by Chris Muller 27 Apr '15

27 Apr '15

Just an update: I think its obvious at this point that we won't be releasing on 4/30. This is fine because development has been very active on both the image and VM side's lately. Once this wave settles down, we'll be at a place to gather up a great release-candidate image and bang on it for a month before releasing. We could try to shoot for 5/31 but, realistically, it will probably be into June before we actually get it out the door.

2 1

Re: The Trunk: Morphic-mt.943.mcz
by Marcel Taeumel 27 Apr '15

27 Apr '15

wrapborder.png <http://forum.world.st/file/n4822205/wrapborder.png> Best, Marcel -- View this message in context: http://forum.world.st/The-Trunk-Morphic-mt-943-mcz-tp4822203p4822205.html Sent from the Squeak - Dev mailing list archive at Nabble.com.

2 1

← Newer
1
...
5
6
7
8
9
10
11
...
65
Older →

Jump to page: