From d660c94ef9d7373862059ff1d01de8bfcd60b234 Mon Sep 17 00:00:00 2001 From: Esteban Lorenzano Date: Mon, 14 Oct 2024 13:27:41 +0200 Subject: [PATCH] fix test --- src/Spec2-Code-Tests/SpCodePresenterTest.class.st | 8 ++++++-- 1 file changed, 6 insertions(+), 2 deletions(-) diff --git a/src/Spec2-Code-Tests/SpCodePresenterTest.class.st b/src/Spec2-Code-Tests/SpCodePresenterTest.class.st index 817b1a3f..4f43c0b8 100644 --- a/src/Spec2-Code-Tests/SpCodePresenterTest.class.st +++ b/src/Spec2-Code-Tests/SpCodePresenterTest.class.st @@ -57,9 +57,13 @@ SpCodePresenterTest >> testContextKeyBindings [ | contextKeyBindings | contextKeyBindings := presenter contextKeyBindings. - self assert: contextKeyBindings isNotNil. - self assert: (contextKeyBindings isKindOf: KMCategory). + self assert: contextKeyBindings isNil. + presenter bindKeyCombination: $x asKeyCombination toAction: [ "none" ]. + + contextKeyBindings := presenter contextKeyBindings. + self deny: contextKeyBindings isNil. + self assert: (contextKeyBindings isKindOf: KMCategory) ] { #category : 'tests' }