9 lines
275 B
Smalltalk
9 lines
275 B
Smalltalk
accessing
|
|
url
|
|
^ url ifNil: [ | temp |
|
|
temp := ((self documentTree xpath: '//div[@class="profile-website"]') // 'a' @@ 'href') first.
|
|
temp ifNil: [ ^ url := nil ].
|
|
temp := temp replaceAll: $Ú with: $u.
|
|
temp := temp replaceAll: $í with: $i.
|
|
url := temp asUrl.
|
|
] |