Updating for the new minor version.

This commit is contained in:
Offray Vladimir Luna Cárdenas 2016-09-20 17:39:46 +00:00
parent b4b6270774
commit 9c7fffcb24

View File

@ -556,15 +556,14 @@ GrafoscopioNotebook >> updateBodyFor: aNodeContainer [
{ #category : #operation } { #category : #operation }
GrafoscopioNotebook >> updateForSpecialHeader [ GrafoscopioNotebook >> updateForSpecialHeader [
"I see if a node header is an ulr located at 'http://ws.stfx.eu', wich means that is a shared "I see if a node header is an url located at 'http://ws.stfx.eu', wich means that is a shared
workspace, and convert the node body to an interactive playground" workspace, and convert the node body to an interactive playground"
| currentNode nodeContent | | currentNode nodeContent |
currentNode := tree highlightedItem. currentNode := tree highlightedItem.
currentNode ifNil: [ ^ self ]. currentNode ifNil: [ ^ self ].
nodeContent := currentNode content. nodeContent := currentNode content.
nodeContent header asUrl host = 'ws.stfx.eu' nodeContent header isAsciiString ifFalse: [ ^ self ].
ifFalse: [ ^ self ]. nodeContent header asUrl host = 'ws.stfx.eu' ifFalse: [ ^ self ].
nodeContent nodeContent
body: (ZnClient new get: nodeContent header); body: (ZnClient new get: nodeContent header);
tagAs: 'código'. tagAs: 'código'.