diff --git a/Iceberg/IceCredentialsProvider.class.st b/Iceberg/IceCredentialsProvider.class.st
index c8311e0cfd..59e4c9b924 100644
--- a/Iceberg/IceCredentialsProvider.class.st
+++ b/Iceberg/IceCredentialsProvider.class.st
@@ -169,7 +169,7 @@ IceCredentialsProvider >> providePlaintextCredentialsTo: credentials [
 	tries := tries + 1.
 
 	tries >= 3 ifTrue: [ 
-		Transcript show: 'aborting'; cr.
+		'aborting' traceCr.
 		LGitNoCredentialsProvided signal: 'There where already three failed attempts, aborting' ].
 	
 	tries = 1 & self plaintextCredentials isPresent
@@ -184,7 +184,7 @@ IceCredentialsProvider >> provideSshAgentCredentialsTo: credentials [
 	"Just check for tries to ensure we do not enter an infinite cycle in libgit2"
 	tries := tries + 1.
 	tries >= 3 ifTrue: [ 
-		Transcript show: 'aborting'; cr.
+		'aborting' traceCr.
 		LGitNoCredentialsProvided signal: 'No ssh-agent credentials found.' ]
 ]
 
@@ -193,7 +193,7 @@ IceCredentialsProvider >> provideSshCredentialsTo: credentials [
 	tries := tries + 1.
 
 	tries >= 3 ifTrue: [ 
-		Transcript show: 'aborting'; cr.
+		'aborting' traceCr.
 		LGitNoCredentialsProvided signal: 'There where already three failed attempts, aborting' ].
 		
 	tries = 1 & self sshCredentials isPresent