SmallWiki Links

Good morning, I want to test a part of my code for SmallWiki. In that attempt, I need to create folders nested in each others. But each time I try to create links, they are broken. Here is the following code : | aFolder1 aFolder2 paragraph1 link1| aFolder1 := (Folder title: 'root'). aFolder2 := (Folder parent: aFolder1) title: 'folder 2'. link1 := Link newTo: (aFolder2 url ) from: aFolder1. paragraph1 := (Paragraph new) add: link1. aFolder1 document add: paragraph1. ^link1 this return a broken link. Can you tell me how to do this method properly ? thank you, Fred