The Inbox: EToys-hjh.308.mcz

Previous Topic Next Topic
 
classic Classic list List threaded Threaded
2 messages Options
Reply | Threaded
Open this post in threaded view
|

The Inbox: EToys-hjh.308.mcz

commits-2
A new version of EToys was added to project The Inbox:
http://source.squeak.org/inbox/EToys-hjh.308.mcz

==================== Summary ====================

Name: EToys-hjh.308
Author: hjh
Time: 9 October 2017, 11:29:30.946214 am
UUID: 2dbdc43f-4c5a-411b-bbd5-d0cc06864fd6
Ancestors: EToys-topa.307

Change from old
     Preferences menuTitleBorderColor
to new
     self userInterfactTheme menuTitleBorderColor

This change allows the Etoys project
     http://squeakland.org/content/articles/attach/FollowRoad.012.pr

to load when dropped onto the desktop.

=============== Diff against EToys-topa.307 ===============

Item was changed:
  ----- Method: CategoryViewer>>addNamePaneTo: (in category 'header pane') -----
  addNamePaneTo: header
  "Add the namePane, which is a pop-up"
 
  | triangle aLabel |
  namePane := BorderedMorph new.
  namePane layoutPolicy: TableLayout new.
  namePane hResizing: #spaceFill.
  namePane listDirection: #leftToRight.
  namePane wrapCentering: #center.
  namePane cellInset: 2.
  namePane layoutInset: 6 @ 0.
 
  namePane color: ScriptingSystem baseColor.
+ namePane borderColor: (self userInterfaceTheme menuTitleBorderColor
+ ifNil: [(Color r: 0.6 g: 0.7 b: 1)]).
- namePane borderColor: Preferences menuTitleBorderColor.
  namePane borderWidth: 0.
 
  namePane height: TileMorph defaultH.
  namePane useRoundedCornersInEtoys.
 
  triangle := ImageMorph new image: (ScriptingSystem formAtKey: #MenuTriangle).
  namePane addMorph: triangle.
  aLabel := StringMorph contents: '---------' font: ScriptingSystem fontForViewerCategoryPopups.
 
  namePane addMorphBack: aLabel.
  namePane on: #mouseDown send: #chooseCategory to: self.
  header addMorphBack: namePane!


Reply | Threaded
Open this post in threaded view
|

Re: The Inbox: EToys-hjh.308.mcz

Hannes Hirzel
A fix mentioned in the thread
    MorphicProject subclass: #EtoysProject

On Mon, 9 Oct 2017 09:30:04 0000, [hidden email]
<[hidden email]> wrote:

> A new version of EToys was added to project The Inbox:
> http://source.squeak.org/inbox/EToys-hjh.308.mcz
>
> ==================== Summary ====================
>
> Name: EToys-hjh.308
> Author: hjh
> Time: 9 October 2017, 11:29:30.946214 am
> UUID: 2dbdc43f-4c5a-411b-bbd5-d0cc06864fd6
> Ancestors: EToys-topa.307
>
> Change from old
>      Preferences menuTitleBorderColor
> to new
>      self userInterfactTheme menuTitleBorderColor
>
> This change allows the Etoys project
>      http://squeakland.org/content/articles/attach/FollowRoad.012.pr
>
> to load when dropped onto the desktop.
>
> =============== Diff against EToys-topa.307 ===============
>
> Item was changed:
>   ----- Method: CategoryViewer>>addNamePaneTo: (in category 'header pane')
> -----
>   addNamePaneTo: header
>   "Add the namePane, which is a pop-up"
>
>   | triangle aLabel |
>   namePane := BorderedMorph new.
>   namePane layoutPolicy: TableLayout new.
>   namePane hResizing: #spaceFill.
>   namePane listDirection: #leftToRight.
>   namePane wrapCentering: #center.
>   namePane cellInset: 2.
>   namePane layoutInset: 6 @ 0.
>
>   namePane color: ScriptingSystem baseColor.
> + namePane borderColor: (self userInterfaceTheme menuTitleBorderColor
> + ifNil: [(Color r: 0.6 g: 0.7 b: 1)]).
> - namePane borderColor: Preferences menuTitleBorderColor.
>   namePane borderWidth: 0.
>
>   namePane height: TileMorph defaultH.
>   namePane useRoundedCornersInEtoys.
>
>   triangle := ImageMorph new image: (ScriptingSystem formAtKey:
> #MenuTriangle).
>   namePane addMorph: triangle.
>   aLabel := StringMorph contents: '---------' font: ScriptingSystem
> fontForViewerCategoryPopups.
>
>   namePane addMorphBack: aLabel.
>   namePane on: #mouseDown send: #chooseCategory to: self.
>   header addMorphBack: namePane!
>
>
>