[etoys-dev] Etoys: MorphicExtras-kfr.36.mcz

[commits at source.squeak.org]

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

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

Name: MorphicExtras-kfr.36
Author: kfr
Time: 12 October 2011, 10:18:18 am
UUID: b660c016-d5af-184e-8b3c-8f103ea78d97
Ancestors: MorphicExtras-kfr.35

Do not clobber instance variables.

=============== Diff against MorphicExtras-kfr.35 ===============

Item was changed:
  ----- Method: WebCamMorph>>on (in category 'accessing') -----
  on
  	camIsOn ifTrue: [^ true].
  
  	"Avoid more than one WebCamMorph per Camera"
  	(CameraInterface cameraIsOpen: camNum) ifTrue: [^ false].
  	
  	(CameraInterface openCamera: camNum 
  		width: (frameExtent x) 
  		height: (frameExtent y)
  	) ifNil: [^ false].
  
  	(Delay forSeconds: startupDelay) wait.
  
+ 	"frameExtent := CameraInterface frameExtent: camNum.
+ 	captureForm := Form extent: (CameraInterface frameExtent: camNum) depth: 32."
- 	frameExtent := CameraInterface frameExtent: camNum.
- 	captureForm := Form extent: (CameraInterface frameExtent: camNum) depth: 32.
  
  	self resetFrameCount.
  	lastTime := nil.
  	captureDelayMs := 20.
  
  	camIsOn := true.
  	lastCaptureTime := Time millisecondClockValue.
+ 	"self startStepping."
- 	self startStepping.
  
  	^ true	
  !