[etoys-dev] Etoys: Etoys-kfr.149.mcz

[commits at source.squeak.org]

Karl Ramberg uploaded a new version of Etoys to project Etoys:
http://source.squeak.org/etoys/Etoys-kfr.149.mcz

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

Name: Etoys-kfr.149
Author: kfr
Time: 6 December 2012, 12:48:27 pm
UUID: f8ff8b59-91b7-df49-8060-60b878dfb661
Ancestors: Etoys-kfr.148

Whirl filter does not like floating point numbers

=============== Diff against Etoys-kfr.148 ===============

Item was changed:
  ----- Method: Player>>setWhirl: (in category 'sketch filters') -----
  setWhirl: aNumber
+ 	| number |
  	self costume renderedMorph isSketchMorph ifFalse:[^nil].
+ 	number := aNumber truncated.
+ 	self sendMessageToCostume: #filtersAdd: with: { #whirl:form: . number}!
- 	self sendMessageToCostume: #filtersAdd: with: { #whirl:form: . aNumber}!