diff --git a/src/GToolkit-World/GtHomeMultiCardGetStartedSection.class.st b/src/GToolkit-World/GtHomeMultiCardGetStartedSection.class.st index 8b4c34d1..7659bca0 100644 --- a/src/GToolkit-World/GtHomeMultiCardGetStartedSection.class.st +++ b/src/GToolkit-World/GtHomeMultiCardGetStartedSection.class.st @@ -14,7 +14,7 @@ Class { GtHomeMultiCardGetStartedSection >> aboutThisBookCard [ "" - + ^ GtHomeCard page priority: 20; pageName: 'About this book'; @@ -31,7 +31,7 @@ GtHomeMultiCardGetStartedSection >> defaultPriority [ GtHomeMultiCardGetStartedSection >> gtBookCard [ - + ^ GtHomeCard lepiterBaseWithTableOfContents title: 'Glamorous Toolkit Book'; description: 'Read the extensive book'; @@ -53,7 +53,7 @@ GtHomeMultiCardGetStartedSection >> gtBookCard [ { #category : #example } GtHomeMultiCardGetStartedSection >> gtBookCardSection [ - + ^ self ] @@ -72,7 +72,7 @@ GtHomeMultiCardGetStartedSection >> gtTourCard [ GtHomeMultiCardGetStartedSection >> gtUsedKnowledgeBaseCard [ - + ^ GtHomeCard lepiterBaseWithTableOfContents title: 'Local knowledge base'; description: 'Explore your local knowledge base'; diff --git a/src/GToolkit-World/GtHomeMultiCardSectionExamples.class.st b/src/GToolkit-World/GtHomeMultiCardSectionExamples.class.st index 22f29d81..ffc437d2 100644 --- a/src/GToolkit-World/GtHomeMultiCardSectionExamples.class.st +++ b/src/GToolkit-World/GtHomeMultiCardSectionExamples.class.st @@ -14,7 +14,7 @@ Class { GtHomeMultiCardSectionExamples >> aboutThisBookCard [ - + ^ GtHomeCard page priority: 20; page: (LeDatabase gtBook pageNamed: 'About this book'); @@ -43,10 +43,10 @@ GtHomeMultiCardSectionExamples >> gtBook2CardSection [ with the pragma." - + | section | section := self. - self assert: section cards size equals: 2. + self assert: section cards size equals: 3. ^ section ] @@ -54,7 +54,7 @@ GtHomeMultiCardSectionExamples >> gtBook2CardSection [ GtHomeMultiCardSectionExamples >> gtBookCard [ - + ^ GtHomeCard page title: 'Glamorous Toolkit Book'; description: 'Read the Glamorous Toolkit book';