From 9aaa1ddfec1c0c543f49fb0ced007a42174f910b Mon Sep 17 00:00:00 2001
From: CyrilFerlicot <cyril@ferlicot.me>
Date: Mon, 31 Jan 2022 12:09:57 +0100
Subject: [PATCH] Fix tests

---
 .../MDLTabsWidgetTest.class.st                                | 4 ++--
 src/Material-Design-Lite-Widgets/MDLNestedList.class.st       | 2 +-
 .../MDLNestedListItemRenderAbstractStrategy.class.st          | 2 +-
 3 files changed, 4 insertions(+), 4 deletions(-)

diff --git a/src/Material-Design-Lite-Widgets-Tests/MDLTabsWidgetTest.class.st b/src/Material-Design-Lite-Widgets-Tests/MDLTabsWidgetTest.class.st
index 372f3d6f..705058ae 100644
--- a/src/Material-Design-Lite-Widgets-Tests/MDLTabsWidgetTest.class.st
+++ b/src/Material-Design-Lite-Widgets-Tests/MDLTabsWidgetTest.class.st
@@ -13,7 +13,7 @@ MDLTabsWidgetTest >> testAddTabNamedContent [
 					(MDLTabWidget new
 						addTabNamed: 'Tab label' content: 'Tab content';
 						yourself) ]
-		generatedIncludesAll: #('<a class="mdl-tabs__tab is-active" href="#id2">Tab label</a>' '<div class="mdl-tabs__panel is-active" id="id2">Tab content</div>')
+		generatedIncludesAll: #('<a class="mdl-tabs__tab is-active"' 'href="#id2">Tab label</a>' '<div class="mdl-tabs__panel is-active" id="id2">Tab content</div>')
 ]
 
 { #category : #tests }
@@ -43,5 +43,5 @@ MDLTabsWidgetTest >> testWithTwoTabs [
 						addTabNamed: 'Tab label' content: 'Tab content';
 						addTabNamed: 'Tab label 2' content: 'Tab content 2';
 						yourself) ]
-		generatedIncludesAll: #('<a class="mdl-tabs__tab is-active" href="#id2">Tab label</a>' '<div class="mdl-tabs__panel is-active" id="id2">Tab content</div>' '<a class="mdl-tabs__tab" href="#id3">Tab label 2</a>' '<div class="mdl-tabs__panel" id="id3">Tab content 2</div>')
+		generatedIncludesAll: #('<a class="mdl-tabs__tab is-active"' 'Tab label</a>' '<div class="mdl-tabs__panel is-active"' 'Tab content</div>' '<a class="mdl-tabs__tab"' 'Tab label 2</a>' '<div class="mdl-tabs__panel"' 'Tab content 2</div>')
 ]
diff --git a/src/Material-Design-Lite-Widgets/MDLNestedList.class.st b/src/Material-Design-Lite-Widgets/MDLNestedList.class.st
index 33c47c5c..6cd56814 100644
--- a/src/Material-Design-Lite-Widgets/MDLNestedList.class.st
+++ b/src/Material-Design-Lite-Widgets/MDLNestedList.class.st
@@ -329,7 +329,7 @@ MDLNestedList >> filteredElements [
 
 { #category : #accessing }
 MDLNestedList >> format [
-	^ self strategy format ifNil: [ #asString ]
+	^ self strategy format
 ]
 
 { #category : #accessing }
diff --git a/src/Material-Design-Lite-Widgets/MDLNestedListItemRenderAbstractStrategy.class.st b/src/Material-Design-Lite-Widgets/MDLNestedListItemRenderAbstractStrategy.class.st
index 4a7fc32a..ffd9b728 100644
--- a/src/Material-Design-Lite-Widgets/MDLNestedListItemRenderAbstractStrategy.class.st
+++ b/src/Material-Design-Lite-Widgets/MDLNestedListItemRenderAbstractStrategy.class.st
@@ -65,7 +65,7 @@ MDLNestedListItemRenderAbstractStrategy >> entryCustomizationHook: anObject [
 
 { #category : #accessing }
 MDLNestedListItemRenderAbstractStrategy >> format [
-	^ format
+	^ format ifNil: [ #asString ]
 ]
 
 { #category : #accessing }