diff --git a/src/Spec2-Core/SpTPresenterBuilder.trait.st b/src/Spec2-Core/SpTPresenterBuilder.trait.st
index 6383dbb3..ef41427d 100644
--- a/src/Spec2-Core/SpTPresenterBuilder.trait.st
+++ b/src/Spec2-Core/SpTPresenterBuilder.trait.st
@@ -117,6 +117,11 @@ SpTPresenterBuilder >> newLabel [
 	^ self instantiate: SpLabelPresenter
 ]
 
+{ #category : 'scripting - widgets' }
+SpTPresenterBuilder >> newLink [
+	^ self instantiate: SpLinkPresenter
+]
+
 { #category : 'scripting - widgets' }
 SpTPresenterBuilder >> newList [
 	^ self instantiate: SpListPresenter
diff --git a/src/Spec2-Morphic/SpTPresenterBuilder.extension.st b/src/Spec2-Morphic/SpTPresenterBuilder.extension.st
index 72d76028..2184ad13 100644
--- a/src/Spec2-Morphic/SpTPresenterBuilder.extension.st
+++ b/src/Spec2-Morphic/SpTPresenterBuilder.extension.st
@@ -1,10 +1,5 @@
 Extension { #name : 'SpTPresenterBuilder' }
 
-{ #category : '*Spec2-Morphic' }
-SpTPresenterBuilder >> newLink [
-	^ self instantiate: SpLinkPresenter
-]
-
 { #category : '*Spec2-Morphic' }
 SpTPresenterBuilder >> newMorph [