diff --git a/repository/Grafoscopio/GrafoscopioNode.class.st b/repository/Grafoscopio/GrafoscopioNode.class.st index 2ddd88c..86dc3e6 100644 --- a/repository/Grafoscopio/GrafoscopioNode.class.st +++ b/repository/Grafoscopio/GrafoscopioNode.class.st @@ -979,11 +979,13 @@ GrafoscopioNode >> root [ GrafoscopioNode >> sanitizeDefaultLink [ | defaultLink sanitized protocol | defaultLink := self lastLink. - protocol := 'docutopia://'. - (defaultLink beginsWith: protocol ) - ifTrue: [ sanitized := defaultLink copyReplaceAll: protocol with: 'https://docutopia.tupale.co/' ]. + protocol := 'docutopia://'. + sanitized := (defaultLink beginsWith: protocol) + ifTrue: [ defaultLink + copyReplaceAll: protocol + with: 'https://docutopia.tupale.co/' ] + ifFalse: [ defaultLink ]. ^ sanitized - ] { #category : #accessing }