On 2012-06-25, at 19:32, Karl Ramberg (JIRA) wrote:
> [ http://tracker.squeakland.org/browse/SQ-1076 ]
>
> I did the test and found no difference with the use of showTemporaryCursor:hotSpotOffset:
>
> I tested some more and it seems I gave wrong reason before.
>
> Big cursor is causing this error.
> When I turn off big cursor just the colorPicker show.
>
> It must be a bug in big cursor prim on windows.
I added a possible workaround to the bug report. It makes sure the small blank cursor is shown even when the bigCursor pref is on.
- Bert -
Maybe someone here wants to tackle this ...
- Bert -
Begin forwarded message:
> From: Bert Freudenberg <bert(a)freudenbergs.de>
> Subject: [squeak-dev] Julian dates
> Date: 25. Juni 2012 13:54:08 MESZ
> To: The general-purpose Squeak developers list <squeak-dev(a)lists.squeakfoundation.org>
> Reply-To: The general-purpose Squeak developers list <squeak-dev(a)lists.squeakfoundation.org>
>
> Squeak dates are based on the Julian Day Number:
>
> http://en.wikipedia.org/wiki/Julian_day
>
> This is defined as the number of days since January 1, 4713 BC in the Julian proleptic calendar.
>
> Now, to my surprise,
>
> Date julianDayNumber: 0
>
> answers
>
> 24 November -4713
>
> instead of
>
> 1 January -4712
>
> Digging into this it is because Squeak uses the Fliegel-Van Flandern algorithm, which always results in a Gregorian date. Even for dates before the Gregorian calendar was introduced. If we were to use the algorithm by Jean Meeus, dates before 15 Nov 1582 would be converted to a Julian date.
>
> Meeus is a floating point algorithm which we may not want to use. I added a correction to our method similar to Meeus, but converted to integers. So this is a mixed one, pasted below.
>
> Would anyone be opposed to adopt this? The behavior will be unchanged for all dates more recent than 15 Nov 1582.
>
> If so, we also would need an adjustment for the reverse part in year:month:day:hour:minute:second:nanoSecond:offset:. This is already covered by a test using the year 1200 BC (DateAndTimeTest>>testFromString). Anybody up for making that work?
>
> I stumbled upon this because Etoys 5 has a new Calendar object which exposes the Julian Day Number, and setting it to 0 is a very convenient way of explaining what that means.
>
> Thanks!
>
> - Bert -
>
> dayMonthYearDo: aBlock
> "Evaluate the block with three arguments: day month, year.
> Uses the Fliegel-Van Flandern algorithm, with adjustment for dates before 15 Nov 1582 as given by Jean Meeus.
> See http://mathforum.org/library/drmath/view/51907.html"
>
> | a l n i j dd mm yyyy |
> a := jdn.
> a < 2299161 ifTrue: [ | alpha |
> alpha := (jdn * 4 - 7468865) // 146097.
> a := jdn - 1 - alpha + (alpha // 4)].
> l := a + 68569.
> n := 4 * l // 146097.
> l := l - (146097 * n + 3 // 4).
> i := 4000 * (l + 1) // 1461001.
> l := l - (1461 * i // 4) + 31.
> j := 80 * l // 2447.
> dd := l - (2447 * j // 80).
> l := j // 11.
> mm := j + 2 - (12 * l).
> yyyy := 100 * (n - 49) + i + l.
>
> ^ aBlock
> value: dd
> value: mm
> value: yyyy
>
>
Spam detection software, running on the system "europa.mgmt.inetu.net", has
identified this incoming email as possible spam. The original message
has been attached to this so you can view it (if it isn't spam) or label
similar future email. If you have any questions, see
the administrator of that system for details.
Content preview: Repository: http://etoys.squeak.org/svn Revision: 1681 Author:
bf Date: 2012-06-24 23:40:15 +0000 (Sun, 24 Jun 2012) Log Message: 5.0.1
RC1 (2407) Modified Paths: trunk/Etoys/NEWS trunk/Etoys/etoys.changes trunk/Etoys/etoys.image
trunk/VM/os-x/app/Contents/Info.plist trunk/VM/to-go/Contents/Info.plist
trunk/po/templates/BroomMorphs.pot trunk/po/templates/Collections.pot trunk/po/templates/Compression.pot
trunk/po/templates/Connectors.pot trunk/po/templates/DAVServerDirectory.pot
trunk/po/templates/DrGeoII-Core.pot trunk/po/templates/Etoys-Tiles.pot trunk/po/templates/Etoys.pot
trunk/po/templates/FSM.pot trunk/po/templates/Files.pot trunk/po/templates/Flash.pot
trunk/po/templates/GStreamer-UI.pot trunk/po/templates/Graphics.pot trunk/po/templates/Kernel.pot
trunk/po/templates/Monticello.pot trunk/po/templates/Morphic.pot trunk/po/templates/MorphicExtras.pot
trunk/po/templates/Movies.pot trunk/po/templates/Nebraska.pot trunk/po/templates/Network.pot
trunk/po/templates/Pango.pot trunk/po/templates/Protocols.pot trunk/po/templates/SMLoader.pot
trunk/po/templates/ST80.pot trunk/po/templates/ScratchConnect.pot trunk/po/templates/Sound.pot
trunk/po/templates/Sugar.pot trunk/po/templates/System.pot trunk/po/templates/Tools.pot
trunk/po/templates/TrueType.pot trunk/po/templates/VideoForSqueak.pot trunk/po/templates/WS-Sound.pot
[...]
Content analysis details: (5.8 points, 5.0 required)
pts rule name description
---- ---------------------- --------------------------------------------------
3.5 BAYES_99 BODY: Bayes spam probability is 99 to 100%
[score: 1.0000]
1.5 SUBJ_ALL_CAPS Subject is all capitals
0.8 RDNS_NONE Delivered to internal network by a host with no rDNS
The original message was not completely plain text, and may be unsafe to
open with some email clients; in particular, it may contain a virus,
or confirm that your address can receive spam. If you wish to view
it, it may be safer to save it to a file and open it with an editor.
Bert Freudenberg uploaded a new version of GetText to project Etoys:
http://source.squeak.org/etoys/GetText-bf.16.mcz
==================== Summary ====================
Name: GetText-bf.16
Author: bf
Time: 24 June 2012, 10:31:35 pm
UUID: d4ca0109-a283-44de-a385-92b4fd84ff2a
Ancestors: GetText-bf.15
Better comment in POT for translators about the meta-phrases 'Language-Name' and 'Language-Direction'
=============== Diff against GetText-bf.15 ===============
Item was changed:
----- Method: GetTextExporter>>createExtraInformation (in category 'private') -----
createExtraInformation
| extras |
extras := OrderedCollection new.
#(
+ 'ATTENTION TRANSLATORS!! This should be the name of your language as you would like it to appear in the Languages menu, e.g. "Español" or "English"' 'Language-Name'
+ 'ATTENTION TRANSLATORS!! Put in the directionality of your language, that is "LTR" for left-to-right or "RTL" for right-to-left' 'Language-Direction'
- 'Language name as you''d like it to appear in the Languages menu' 'Language-Name'
- 'Directionality of language' 'Language-Direction'
) pairsDo: [:first :second |
extras add: (Array with: '' with: first with: second).
].
^ extras!
Bert Freudenberg uploaded a new version of Morphic to project Etoys:
http://source.squeak.org/etoys/Morphic-bf.95.mcz
==================== Summary ====================
Name: Morphic-bf.95
Author: bf
Time: 24 June 2012, 8:42:50 pm
UUID: 8436dee1-cc69-4b56-9d34-5ab9d0f6d2dd
Ancestors: Morphic-bf.94
SQ-1036: Fix typo in halo menu ballon help
=============== Diff against Morphic-bf.94 ===============
Item was changed:
----- Method: Morph>>addToggleItemsToHaloMenu: (in category 'menus') -----
addToggleItemsToHaloMenu: aMenu
"Add standard true/false-checkbox items to the memu"
#(
+ (resistsRemovalString toggleResistsRemoval 'whether I should be resistant to easy deletion via the pink X handle')
- (resistsRemovalString toggleResistsRemoval 'whether I should be reistant to easy deletion via the pink X handle')
(stickinessString toggleStickiness 'whether I should be resistant to a drag done by mousing down on me')
(lockedString lockUnlockMorph 'when "locked", I am inert to all user interactions')
(hasClipSubmorphsString changeClipSubmorphs 'whether the parts of objects within me that are outside my bounds should be masked.')
(hasDirectionHandlesString changeDirectionHandles 'whether direction handles are shown with the halo')
(hasDragAndDropEnabledString changeDragAndDrop 'whether I am open to having objects dropped into me')
) translatedNoop do:
[:trip |
(Preferences eToyFriendly not or: [trip size = 3]) ifTrue: [
aMenu addUpdating: trip first action: trip second.
aMenu balloonTextForLastItem: trip third translated
]
].
self couldHaveRoundedCorners ifTrue:
[aMenu addUpdating: #roundedCornersString action: #toggleCornerRounding.
aMenu balloonTextForLastItem: 'whether my corners should be rounded' translated]!