diff --git a/src/MiniDocs/GrafoscopioNode.class.st b/src/MiniDocs/GrafoscopioNode.class.st
index b55eb03..dc5e3e0 100644
--- a/src/MiniDocs/GrafoscopioNode.class.st
+++ b/src/MiniDocs/GrafoscopioNode.class.st
@@ -27,6 +27,14 @@ GrafoscopioNode class >> fromFile: aFileReference [
 	^ (STON fromString: aFileReference contents) first parent
 ]
 
+{ #category : #accessing }
+GrafoscopioNode class >> fromLink: aStonLink [
+	| notebook |
+	notebook := (STON fromString: aStonLink asUrl retrieveContents utf8Decoded) first parent.
+	notebook addRemoteLocation: aStonLink.
+	^ notebook
+]
+
 { #category : #accessing }
 GrafoscopioNode >> addRemoteLocation: anURL [ 
 	self remoteLocations add: anURL