Packages April 2010

packages@lists.squeakfoundation.org

1 participants
459 discussions

The Trunk: Tools-ar.235.mcz
by commits＠source.squeak.org 27 Apr '10

27 Apr '10

Andreas Raab uploaded a new version of Tools to project The Trunk: http://source.squeak.org/trunk/Tools-ar.235.mcz ==================== Summary ==================== Name: Tools-ar.235 Author: ar Time: 26 April 2010, 7:53:43.974 pm UUID: e5f7d56c-c8bd-df4a-a205-359e17ec8e19 Ancestors: Tools-cmm.234, Tools-cao.230 Merging Tools-cao.230: Fixes for the following: Shift+menu not respected in browser class panes. Browser>>buildClassListWith: and Browser>>buildClassListSingletonWith: use the older (non-shift key sending) Browser>>classListMenu: rather than: Browser>>classListMenu:shifted: Shift+menu produces DNU in contents pane of file list. MenuMorph>>addAllFrom: expects morphs, but the argument passed is an array of string-selector pairs. Use MenuMorph>>addList: instead. =============== Diff against Tools-cmm.234 =============== Item was changed: ----- Method: Browser>>buildClassListWith: (in category 'toolbuilder') ----- buildClassListWith: builder | listSpec | listSpec := builder pluggableListSpec new. listSpec model: self; list: #classList; getIndex: #classListIndex; setIndex: #classListIndex:; + menu: #classListMenu:shifted:; - menu: #classListMenu:; keyPress: #classListKey:from:. Preferences browseWithDragNDrop ifTrue:[listSpec dragItem: #dragFromClassList:]. ^listSpec ! Item was changed: ----- Method: FileList>>fileContentsMenu:shifted: (in category 'file list menu') ----- fileContentsMenu: aMenu shifted: shifted "Construct aMenu to have items appropriate for the file browser's code pane, given the shift state provided" + | services maybeLine extraLines | - | shiftMenu services maybeLine extraLines | shifted ifTrue: + [^ aMenu addList: StringHolder shiftedYellowButtonMenuItems]. - [shiftMenu := SelectionMenu fromArray: StringHolder shiftedYellowButtonMenuItems. - ^ aMenu addAllFrom: shiftMenu]. fileName ifNotNil: [services := OrderedCollection new. (#(briefHex briefFile needToGetBriefHex needToGetBrief) includes: brevityState) ifTrue: [services add: self serviceGet]. (#(fullHex briefHex needToGetFullHex needToGetBriefHex) includes: brevityState) ifFalse: [services add: self serviceGetHex]. (#(needToGetShiftJIS needToGetEUCJP needToGetCNGB needToGetEUCKR needToGetUTF8) includes: brevityState) ifFalse: [services add: self serviceGetEncodedText]. maybeLine := services size. (FileStream sourceFileSuffixes includes: self suffixOfSelectedFile) ifTrue: [services addAll: (self servicesFromSelectorSpecs: #(fileIntoNewChangeSet: fileIn: browseChangesFile: browseFile:))]. extraLines := OrderedCollection new. maybeLine > 0 ifTrue: [extraLines add: maybeLine]. services size > maybeLine ifTrue: [extraLines add: services size]. aMenu addServices: services for: self fullName extraLines: extraLines]. aMenu addList: { {'find...(f)' translated. #find}. {'find again (g)' translated. #findAgain}. {'set search string (h)' translated. #setSearchString}. #-. {'do again (j)' translated. #again}. {'undo (z)' translated. #undo}. #-. {'copy (c)' translated. #copySelection}. {'cut (x)' translated. #cut}. {'paste (v)' translated. #paste}. {'paste...' translated. #pasteRecent}. #-. {'do it (d)' translated. #doIt}. {'print it (p)' translated. #printIt}. {'inspect it (i)' translated. #inspectIt}. {'fileIn selection (G)' translated. #fileItIn}. #-. {'accept (s)' translated. #accept}. {'cancel (l)' translated. #cancel}. #-. {'more...' translated. #shiftedYellowButtonActivity}}. ^ aMenu ! Item was changed: ----- Method: Browser>>buildClassListSingletonWith: (in category 'toolbuilder') ----- buildClassListSingletonWith: builder | listSpec | listSpec := builder pluggableListSpec new. listSpec model: self; list: #classListSingleton; getIndex: #indexIsOne; setIndex: #indexIsOne:; + menu: #classListMenu:shifted; - menu: #classListMenu:; keyPress: #classListKey:from:. ^listSpec !

1 0

The Trunk: Tools-ar.235.mcz
by commits＠source.squeak.org 27 Apr '10

27 Apr '10

1 0

The Trunk: Tools-ar.235.mcz
by commits＠source.squeak.org 27 Apr '10

27 Apr '10

1 0

The Trunk: Morphic-laza.430.mcz
by commits＠source.squeak.org 26 Apr '10

26 Apr '10

Alexander Lazarević uploaded a new version of Morphic to project The Trunk: http://source.squeak.org/trunk/Morphic-laza.430.mcz ==================== Summary ==================== Name: Morphic-laza.430 Author: laza Time: 26 April 2010, 12:25:16.993 pm UUID: 6362395c-21df-0d4a-a187-99a03416c76c Ancestors: Morphic-laza.429 Add Seaside 2.8, 2.8 Examples and 3.0 to the "How to extend the system" workspace =============== Diff against Morphic-laza.429 =============== Item was changed: (excessive method size, no diff calculated)

1 0

The Trunk: Morphic-laza.430.mcz
by commits＠source.squeak.org 26 Apr '10

26 Apr '10

1 0

The Trunk: Morphic-laza.430.mcz
by commits＠source.squeak.org 26 Apr '10

26 Apr '10

1 0

The Trunk: Morphic-laza.429.mcz
by commits＠source.squeak.org 26 Apr '10

26 Apr '10

Alexander Lazarević uploaded a new version of Morphic to project The Trunk: http://source.squeak.org/trunk/Morphic-laza.429.mcz ==================== Summary ==================== Name: Morphic-laza.429 Author: laza Time: 26 April 2010, 11:04:18.171 am UUID: 83abfdbb-87fd-884d-aafc-f1e78b4eaecb Ancestors: Morphic-laza.428 Avoid also all gray icons for the windows menu in the dockbar with uniform window colors =============== Diff against Morphic-laza.428 =============== Item was changed: ----- Method: TheWorldMainDockingBar>>listWindowsOn: (in category 'submenu - windows') ----- listWindowsOn: menu | windows | windows := SortedCollection sortBlock: [:winA :winB | winA model name = winB model name ifTrue: [winA label < winB label] ifFalse: [winA model name < winB model name]]. windows addAll: self allVisibleWindows. windows ifEmpty: [ menu addItem: [ :item | item contents: 'No Windows' translated; isEnabled: false ] ]. windows do: [ :each | menu addItem: [ :item | item contents: (self windowMenuItemLabelFor: each); + icon: (self colorIcon: each model defaultBackgroundColor); - icon: (self colorIcon: each paneColor); target: each; selector: #comeToFront; subMenuUpdater: self selector: #windowMenuFor:on: arguments: { each }; action: [ each activateAndForceLabelToShow; expand ] ] ].!

1 0

The Trunk: Morphic-laza.429.mcz
by commits＠source.squeak.org 26 Apr '10

26 Apr '10

1 0

The Trunk: Morphic-laza.429.mcz
by commits＠source.squeak.org 26 Apr '10

26 Apr '10

1 0

The Trunk: Morphic-laza.428.mcz
by commits＠source.squeak.org 26 Apr '10

26 Apr '10

Alexander Lazarević uploaded a new version of Morphic to project The Trunk: http://source.squeak.org/trunk/Morphic-laza.428.mcz ==================== Summary ==================== Name: Morphic-laza.428 Author: laza Time: 26 April 2010, 10:43:25.292 am UUID: 94cea554-1ebf-8f45-8cdd-b54b7a74518c Ancestors: Morphic-ar.427 Avoid all gray icons in the tools menu of the dockbar with uniform window colors. =============== Diff against Morphic-ar.427 =============== Item was changed: ----- Method: TheWorldMainDockingBar>>colorIcon: (in category 'private') ----- colorIcon: aColor + "Guess if 'uniform window colors' are used and avoid all icons to be just gray" + (aColor = Preferences uniformWindowColor or: [Preferences tinyDisplay]) ifTrue: [ ^nil ]. - Preferences tinyDisplay ifTrue: [ ^nil ]. ^(aColor iconOrThumbnailOfSize: 14) borderWidth: 3 color: Preferences menuColor muchDarker; borderWidth: 2 color: Color transparent!

1 0

← Newer
1
...
4
5
6
7
8
9
10
...
46
Older →

Jump to page:

2024

2023

2022

2021

2020

2019

2018

2017

2016

2015

2014

2013

2012

2011

2010

2009

2008

2007

2006

2005

Packages April 2010