The Trunk: MorphicExtras-pre.248.mcz

Patrick Rein uploaded a new version of MorphicExtras to project The Trunk:
http://source.squeak.org/trunk/MorphicExtras-pre.248.mcz

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

Name: MorphicExtras-pre.248
Author: pre
Time: 17 December 2018, 5:39:38.046471 pm
UUID: 917e33d3-82e3-47b3-9c57-1389697d90d3
Ancestors: MorphicExtras-pre.247

Recategorizes stepTime and wantsSteps to the stepping category.

=============== Diff against MorphicExtras-pre.247 ===============

Item was changed:
+ ----- Method: BackgroundMorph>>stepTime (in category 'stepping and presenter') -----
- ----- Method: BackgroundMorph>>stepTime (in category 'testing') -----
  stepTime
  "Answer the desired time between steps in milliseconds."
 
  ^ 20!

Item was changed:
+ ----- Method: BouncingAtomsMorph>>stepTime (in category 'stepping and presenter') -----
- ----- Method: BouncingAtomsMorph>>stepTime (in category 'testing') -----
  stepTime
  "As fast as possible."
 
  ^ 0
  !

Item was changed:
+ ----- Method: ClockMorph>>stepTime (in category 'stepping and presenter') -----
- ----- Method: ClockMorph>>stepTime (in category 'testing') -----
  stepTime
  "Answer the desired time between steps in milliseconds."
 
  ^999!

Item was changed:
+ ----- Method: EnvelopeEditorMorph>>stepTime (in category 'stepping and presenter') -----
- ----- Method: EnvelopeEditorMorph>>stepTime (in category 'testing') -----
  stepTime
  ^ 100!

Item was changed:
+ ----- Method: EventRecorderMorph>>stepTime (in category 'stepping and presenter') -----
- ----- Method: EventRecorderMorph>>stepTime (in category 'testing') -----
  stepTime
 
  ^500
  !

Item was changed:
+ ----- Method: EventRecorderMorph>>wantsSteps (in category 'stepping and presenter') -----
- ----- Method: EventRecorderMorph>>wantsSteps (in category 'testing') -----
  wantsSteps
 
  ^true
  !

Item was changed:
+ ----- Method: Flasher>>stepTime (in category 'stepping and presenter') -----
- ----- Method: Flasher>>stepTime (in category 'testing') -----
  stepTime
  "Answer the desired time between steps, in milliseconds."
 
  ^ 500!

Item was changed:
+ ----- Method: FloatingBookControlsMorph>>stepTime (in category 'stepping and presenter') -----
- ----- Method: FloatingBookControlsMorph>>stepTime (in category 'testing') -----
  stepTime
 
  ^1000!

Item was changed:
+ ----- Method: FloatingBookControlsMorph>>wantsSteps (in category 'stepping and presenter') -----
- ----- Method: FloatingBookControlsMorph>>wantsSteps (in category 'testing') -----
  wantsSteps
 
  ^true!

Item was changed:
+ ----- Method: FrameRateMorph>>stepTime (in category 'stepping and presenter') -----
- ----- Method: FrameRateMorph>>stepTime (in category 'testing') -----
  stepTime
  "Answer the desired time between steps in milliseconds."
 
  ^ 0
  !

Item was changed:
+ ----- Method: LedMorph>>stepTime (in category 'stepping and presenter') -----
- ----- Method: LedMorph>>stepTime (in category 'testing') -----
  stepTime
 
  ^ 500!

Item was changed:
+ ----- Method: LedTimerMorph>>stepTime (in category 'stepping and presenter') -----
- ----- Method: LedTimerMorph>>stepTime (in category 'testing') -----
  stepTime
 
  ^ 1000!

Item was changed:
+ ----- Method: MagnifierMorph>>stepTime (in category 'stepping and presenter') -----
- ----- Method: MagnifierMorph>>stepTime (in category 'testing') -----
  stepTime
  ^ 100!

Item was changed:
+ ----- Method: MarqueeMorph>>stepTime (in category 'stepping and presenter') -----
- ----- Method: MarqueeMorph>>stepTime (in category 'testing') -----
  stepTime
          "Answer the desired time between steps in milliseconds."
 
          ^ 200!

Item was changed:
+ ----- Method: MarqueeMorph>>wantsSteps (in category 'stepping and presenter') -----
- ----- Method: MarqueeMorph>>wantsSteps (in category 'testing') -----
  wantsSteps
 
          ^ true!

Item was changed:
+ ----- Method: PianoRollScoreMorph>>stepTime (in category 'stepping and presenter') -----
- ----- Method: PianoRollScoreMorph>>stepTime (in category 'testing') -----
  stepTime
 
  ^ 0
  !

Item was changed:
+ ----- Method: ProjectNavigationMorph>>stepTime (in category 'stepping and presenter') -----
- ----- Method: ProjectNavigationMorph>>stepTime (in category 'testing') -----
  stepTime
 
  ^1000!

Item was changed:
+ ----- Method: ProjectNavigationMorph>>wantsSteps (in category 'stepping and presenter') -----
- ----- Method: ProjectNavigationMorph>>wantsSteps (in category 'testing') -----
  wantsSteps
 
  ^true!

Item was changed:
+ ----- Method: RecordingControlsMorph>>stepTime (in category 'stepping and presenter') -----
- ----- Method: RecordingControlsMorph>>stepTime (in category 'testing') -----
  stepTime
 
  ^ 50
  !

Item was changed:
+ ----- Method: SoundLoopMorph>>stepTime (in category 'stepping and presenter') -----
- ----- Method: SoundLoopMorph>>stepTime (in category 'testing') -----
  stepTime
 
  ^ 50
  !

Item was changed:
+ ----- Method: ThumbnailMorph>>stepTime (in category 'stepping and presenter') -----
- ----- Method: ThumbnailMorph>>stepTime (in category 'testing') -----
  stepTime
  "Adjust my step time to the time it takes drawing my referent"
  drawTime ifNil:[^ 250].
  ^(objectToView updateThresholdForGraphicInViewerTab * drawTime) max: 250.!

Item was changed:
+ ----- Method: TickIndicatorMorph>>stepTime (in category 'stepping and presenter') -----
- ----- Method: TickIndicatorMorph>>stepTime (in category 'testing') -----
  stepTime
  ^(stepTime ifNil:[125]) max: 50!

Item was changed:
+ ----- Method: TickIndicatorMorph>>wantsSteps (in category 'stepping and presenter') -----
- ----- Method: TickIndicatorMorph>>wantsSteps (in category 'testing') -----
  wantsSteps
  ^true!

Item was changed:
+ ----- Method: TransitionMorph>>stepTime (in category 'stepping and presenter') -----
- ----- Method: TransitionMorph>>stepTime (in category 'testing') -----
  stepTime
  ^ stepTime!

Item was changed:
+ ----- Method: UpdatingRectangleMorph>>stepTime (in category 'stepping and presenter') -----
- ----- Method: UpdatingRectangleMorph>>stepTime (in category 'testing') -----
  stepTime
 
  ^ 50!

Item was changed:
+ ----- Method: ZASMScriptMorph>>stepTime (in category 'stepping and presenter') -----
- ----- Method: ZASMScriptMorph>>stepTime (in category 'testing') -----
  stepTime
 
  ^500!

Item was changed:
+ ----- Method: ZASMScriptMorph>>wantsSteps (in category 'stepping and presenter') -----
- ----- Method: ZASMScriptMorph>>wantsSteps (in category 'testing') -----
  wantsSteps
 
  ^true!

Item was changed:
+ ----- Method: ZoomAndScrollControllerMorph>>stepTime (in category 'stepping and presenter') -----
- ----- Method: ZoomAndScrollControllerMorph>>stepTime (in category 'testing') -----
  stepTime
 
  ^10
 
  !

Item was changed:
+ ----- Method: ZoomAndScrollMorph>>stepTime (in category 'stepping and presenter') -----
- ----- Method: ZoomAndScrollMorph>>stepTime (in category 'testing') -----
  stepTime
 
  ^10 "ms"!