Skip to content

Commit

Permalink
fix bugs and change unhide slide
Browse files Browse the repository at this point in the history
  • Loading branch information
markbader committed May 15, 2019
1 parent 81f25c6 commit 3d38d93
Show file tree
Hide file tree
Showing 10 changed files with 27 additions and 15 deletions.
Original file line number Diff line number Diff line change
@@ -1,4 +1,7 @@
accessing
hideSlide

self
symbolForHiding: (ImageMorph new center: self center);
addMorph: self symbolForHiding.
self slide hideSlide
Original file line number Diff line number Diff line change
@@ -1,4 +1,5 @@
accessing
unhideSlide

self symbolForHiding abandon.
self slide unhideSlide
Original file line number Diff line number Diff line change
@@ -1,8 +1,5 @@
updating
updateImage

self slide isHidden
ifTrue: [self symbolForHiding: (TransformMorph new center: self center;yourself). self addMorph: self symbolForHiding. self halt]
ifFalse: [self symbolForHiding ifNotNil: [self symbolForHiding abandon]].
self newForm: (self slide imageForm scaledToSize: self formSize).
self borderWidth: self borderWidth
Original file line number Diff line number Diff line change
Expand Up @@ -6,7 +6,7 @@
"defaultWidth" : "LM 7/6/2018 13:51",
"formSize" : "LB 7/6/2018 15:25",
"handlesMouseDown:" : "WoC 6/29/2018 15:33",
"hideSlide" : "mb 5/10/2019 14:14",
"hideSlide" : "mb 5/15/2019 18:44",
"highlight" : "LB 7/3/2018 16:57",
"highlightBorderColor" : "LB 7/5/2018 22:01",
"highlightBorderWidth" : "LB 6/29/2018 17:16",
Expand All @@ -20,5 +20,5 @@
"symbolForHiding" : "kw 5/15/2019 17:35",
"symbolForHiding:" : "kw 5/15/2019 17:35",
"unHighlight" : "LM 7/6/2018 15:01",
"unhideSlide" : "mb 5/10/2019 14:15",
"updateImage" : "kw 5/15/2019 18:07" } }
"unhideSlide" : "mb 5/15/2019 18:45",
"updateImage" : "mb 5/15/2019 18:45" } }
Original file line number Diff line number Diff line change
@@ -1,4 +1,4 @@
slide management
nextSlide

self selectSlideNumber: self nextUnhidedSlide
self selectSlideNumber: self nextVisibleSlideNumber

This file was deleted.

Original file line number Diff line number Diff line change
@@ -0,0 +1,7 @@
slide management
nextVisibleSlideNumber

self currentSlideNumber+1 to: self slideCount do:
[:counter | (self presentation slideAt: counter) isHidden
ifFalse: [^ counter]].
^self currentSlideNumber
Original file line number Diff line number Diff line change
@@ -1,4 +1,4 @@
slide management
previousSlide

self selectSlideNumber: self currentSlideNumber - 1
self selectSlideNumber: self previousVisibleSlideNumber
Original file line number Diff line number Diff line change
@@ -0,0 +1,7 @@
slide management
previousVisibleSlideNumber

self currentSlideNumber-1 to: 1 by: -1 do:
[:counter | (self presentation slideAt: counter) isHidden
ifFalse: [^ counter]].
^self currentSlideNumber
Original file line number Diff line number Diff line change
Expand Up @@ -85,9 +85,9 @@
"newLineShape" : "VO 4/25/2019 17:35",
"newRectangleShape" : "VO 4/25/2019 17:54",
"newTextField" : "LB 5/25/2018 16:43",
"nextSlide" : "kw 5/15/2019 17:19",
"nextSlide" : "mb 5/15/2019 18:57",
"nextSlideButtonData" : "JZ 7/6/2018 15:23",
"nextUnhidedSlide" : "kw 5/15/2019 17:42",
"nextVisibleSlideNumber" : "mb 5/15/2019 19:00",
"openFileMenu" : "WoC 7/13/2018 18:45",
"openImageField:" : "LB 5/18/2018 17:35",
"openInsertMenu" : "VO 4/25/2019 17:07",
Expand All @@ -102,8 +102,9 @@
"presentationMode" : "LM 5/25/2018 16:57",
"presentationMode:" : "LM 5/25/2018 16:57",
"presentationModeButtonData" : "LB 6/22/2018 15:49",
"previousSlide" : "LB 6/29/2018 15:45",
"previousSlide" : "mb 5/15/2019 19:02",
"previousSlideButtonData" : "JZ 7/6/2018 15:24",
"previousVisibleSlideNumber" : "mb 5/15/2019 19:06",
"riskyOperationMessage" : "LM 6/23/2018 14:21",
"savePresentation" : "LM 7/13/2018 18:47",
"selectSlide:" : "LM 7/13/2018 17:55",
Expand Down

0 comments on commit 3d38d93

Please sign in to comment.