diff --git a/repository/Grafoscopio/GrafoscopioBrowser.class.st b/repository/Grafoscopio/GrafoscopioBrowser.class.st
index 048d1fc..045c782 100644
--- a/repository/Grafoscopio/GrafoscopioBrowser.class.st
+++ b/repository/Grafoscopio/GrafoscopioBrowser.class.st
@@ -104,10 +104,10 @@ browser := GLMTabulator new
 
 browser
     column: [:c | 
-		c 	row: #tree;
-			row: #nodeHeader] span: 2;
+		c 	row: #tree span: 6;
+			row: #nodeHeader span: 1] span: 1;
     column: [ :c |
-              c row: #nodeBody span: 2] span: 4.
+              c row: #nodeBody span: 2] span: 5.
 browser 
 	updateOn: GLMItemAdded from: #yourself;
 	updateOn: GLMItemRemoved from: #yourself.
@@ -334,7 +334,7 @@ GrafoscopioBrowser >> headerOn: constructor [
 	"Shows the body of a selected node"
 			
 	(constructor text)
-       title: 'Cabecera | Header ';
+       title: 'Cabecera ';
 		 format:[:eachNode |
           (eachNode header) isNil
               ifTrue: [ '' ]
@@ -496,22 +496,33 @@ GrafoscopioBrowser >> panelBrowserForTransmedia [
 	browser := GLMTabulator new.
 	browser
     	column: [ :c |
-			c  row: [ :r | r column: #original; column: #transmediado];
-				row: #buttons].			
+			c  row: [ :r | r column: #original; column: #transmediado] span: 7;
+				row: #buttons; span: 1].			
 	(browser transmit)
 		to: #original;
-		andShow: [ :a | a text title: 'Original' ].
+		andShow: [ :a | 
+			a text 
+				title: 'Original';
+				format:[:eachNode |
+          		(eachNode body) isNil
+              		ifTrue: [ '' ]
+              		ifFalse: [ eachNode body]].  ].
 	(browser transmit)
 		to: #transmediado;
-		andShow: [ :a | a text title: 'Transmediado' ].
+		andShow: [ :a | 
+			a text 
+				title: 'Transmediado';
+				format:[:eachNode |
+          		(eachNode children) isEmpty
+              		ifTrue: [ '' ]
+              		ifFalse: [eachNode children first body]]. ].
 	(browser transmit) 
 		to: #buttons; 
 		andShow: [ :a |
 			a actionList
-				act: [:entity | entity inspect ] entitled: 'Subir';
+				"act: [:entity | entity inspect ] entitled: 'Subir';"
 				act: [:entity | entity explore ] entitled: 'Previsualizar';
 				act: [:entity | entity explore ] entitled: 'Publicar'].			
-	browser openOn: ''.
 	^ browser.
 
 ]
diff --git a/repository/Grafoscopio/GrafoscopioNode.class.st b/repository/Grafoscopio/GrafoscopioNode.class.st
index eba0674..f942f6a 100644
--- a/repository/Grafoscopio/GrafoscopioNode.class.st
+++ b/repository/Grafoscopio/GrafoscopioNode.class.st
@@ -17,6 +17,7 @@ Class {
 		'key',
 		'icon',
 		'body',
+		'tags',
 		'children',
 		'parent',
 		'node',
@@ -371,18 +372,6 @@ GrafoscopioNode >> parent: aNode [
 	parent := aNode
 ]
 
-{ #category : #'add/remove nodes' }
-GrafoscopioNode >> pasteNodeFromCache [
-	"Copy the contents of the current node into cacheNode. It doesn't work recursively yet, so it doen't copy the children of the nodes"
-
-	cacheNode notNil
-		ifTrue: [ 
-			self header: cacheNode header.
-			self body: cacheNode  body.]
-		ifFalse: [self inform: 'El nodo cache está vacio']
-
-]
-
 { #category : #exporting }
 GrafoscopioNode >> preorderTraversal [
 	nodesInPreorder := OrderedCollection new.