diff --git a/repository/Grafoscopio/GrafoscopioBrowser.class.st b/repository/Grafoscopio/GrafoscopioBrowser.class.st
index 6bbce46..4cffdd3 100644
--- a/repository/Grafoscopio/GrafoscopioBrowser.class.st
+++ b/repository/Grafoscopio/GrafoscopioBrowser.class.st
@@ -13,7 +13,6 @@ Class {
 	#superclass : #Object,
 	#instVars : [
 		'browser',
-		'explorer',
 		'mainTree',
 		'tagsAvailable',
 		'\r\t\t\t\t\t\t\t\t\tnonVar1',
@@ -58,35 +57,17 @@ GrafoscopioBrowser class >> configurePandoc [
 ]
 
 { #category : #'as yet unclassified' }
-GrafoscopioBrowser class >> launchHelpInHtml [
-	"Launches the help manual in PDF format in an external viewer."
-	
-	| htmlHelpFileLocation |
-	htmlHelpFileLocation  := (FileSystem disk workingDirectory parent / 'Docs/Es/Manual/manual-grafoscopio.html') fullName.
-	Smalltalk platform name = 'unix'
-		ifTrue: [ 
-			OSProcess command: 'xdg-open ', htmlHelpFileLocation.			
-		].
-	Smalltalk platform name = 'Win32'
-		ifTrue: [ 
-			OSProcess command: 'explorer ', htmlHelpFileLocation.
-		].
-]
+GrafoscopioBrowser class >> configureSettings [
+	"Stablish several 'global' settings according to the operative system"
 
-{ #category : #'as yet unclassified' }
-GrafoscopioBrowser class >> launchHelpInPdf [
-	"Launches the help manual in PDF format in an external viewer."
-	
-	| pdfHelpFileLocation |
-	pdfHelpFileLocation  := (FileSystem disk workingDirectory parent / 'Docs/Es/Manual/manual-grafoscopio.pdf') fullName.
 	Smalltalk platform name = 'unix'
 		ifTrue: [ 
-			OSProcess command: 'xdg-open ', pdfHelpFileLocation.			
-		].
+			fossil := (FileSystem disk workingDirectory parent / 'Platform/Linux/Programs/Fossil/fossil') fullName.
+			pandoc := (FileSystem disk workingDirectory parent / 'Platform/Linux/Programs/Pandoc/pandoc') fullName].
 	Smalltalk platform name = 'Win32'
 		ifTrue: [ 
-			OSProcess command: 'explorer ', pdfHelpFileLocation.
-		].
+			fossil := (FileSystem disk workingDirectory parent / 'Platform/Windows/Programs/Fossil/fossil.exe') fullName.
+			pandoc := (FileSystem disk workingDirectory parent / 'Platform/Windows/Programs/Pandoc/pandoc.exe') fullName].
 ]
 
 { #category : #'as yet unclassified' }
@@ -137,6 +118,38 @@ GrafoscopioBrowser class >> open [
 	^ self new open
 ]
 
+{ #category : #'as yet unclassified' }
+GrafoscopioBrowser class >> openHelpInHtml [
+	"Launches the help manual in PDF format in an external viewer."
+	
+	| htmlHelpFileLocation |
+	htmlHelpFileLocation  := (FileSystem disk workingDirectory parent / 'Docs/Es/Manual/manual-grafoscopio.html') fullName.
+	Smalltalk platform name = 'unix'
+		ifTrue: [ 
+			OSProcess command: 'xdg-open ', htmlHelpFileLocation.			
+		].
+	Smalltalk platform name = 'Win32'
+		ifTrue: [ 
+			OSProcess command: 'explorer ', htmlHelpFileLocation.
+		].
+]
+
+{ #category : #'as yet unclassified' }
+GrafoscopioBrowser class >> openHelpInPdf [
+	"Launches the help manual in PDF format in an external viewer."
+	
+	| pdfHelpFileLocation |
+	pdfHelpFileLocation  := (FileSystem disk workingDirectory parent / 'Docs/Es/Manual/manual-grafoscopio.pdf') fullName.
+	Smalltalk platform name = 'unix'
+		ifTrue: [ 
+			OSProcess command: 'xdg-open ', pdfHelpFileLocation.			
+		].
+	Smalltalk platform name = 'Win32'
+		ifTrue: [ 
+			OSProcess command: 'explorer ', pdfHelpFileLocation.
+		].
+]
+
 { #category : #'as yet unclassified' }
 GrafoscopioBrowser class >> startDockingBar [
 	"Creates a custom docking bar for grafoscopio on top, with shorcuts for most used actions, and a fixed place for asking for help.
@@ -166,9 +179,9 @@ GrafoscopioBrowser class >> startDockingBar [
 	
 	helpMenu := MenuMorph new.
 	helpMenu 
-		add: 'Manual en PDF' target: GrafoscopioBrowser action: #launchHelpInPdf;
-	 	add: 'Manual en HTML' target: GrafoscopioBrowser action: #launchHelpInHtml;
-		add: 'Manual en grafoscopio' target: GrafoscopioBrowser action: #messageNotImplementedYet;
+		add: 'Manual en PDF' target: GrafoscopioBrowser action: #openHelpInPdf;
+	 	add: 'Manual en HTML' target: GrafoscopioBrowser action: #openHelpInHtml;
+		add: 'Manual en grafoscopio' target: (GrafoscopioBrowser new) action: #openHelpInGrafoscopio;
 		add: 'Ir a la documentación en línea' target: GrafoscopioBrowser action: #messageNotImplementedYet;
 		add: 'Acerca de Grafoscopio' target: GrafoscopioBrowser action: #messageAbout.
 		
@@ -347,6 +360,13 @@ GrafoscopioBrowser >> bodyIn: constructor for: aNode [
               ifFalse: [ aNode body]].
 ]
 
+{ #category : #'graphical interface' }
+GrafoscopioBrowser >> browser [
+	"Returns de browser object, which represents the graphical interface. Useful for debugging purposes"
+
+	^ browser.
+]
+
 { #category : #'graphical interface' }
 GrafoscopioBrowser >> buildBrowser [
 "Main method for building the interface for trees and its nodes"
@@ -525,23 +545,6 @@ GrafoscopioBrowser >> configureInitialTags [
 		add: 'transmediado'.
 ]
 
-{ #category : #'system-support' }
-GrafoscopioBrowser >> configureSettings [
-	"Stablish several 'global' settings according to the operative system"
-
-	Smalltalk platform name = 'unix'
-		ifTrue: [ 
-			fossil := (FileSystem disk workingDirectory parent / 'Platform/Linux/Programs/Fossil/fossil') fullName.
-			pandoc := (FileSystem disk workingDirectory parent / 'Platform/Linux/Programs/Pandoc/pandoc') fullName.
-		].
-	Smalltalk platform name = 'Win32'
-		ifTrue: [ 
-			fossil := (FileSystem disk workingDirectory parent / 'Platform' / 'Windows' / 'Programs' / 'Fossil' / 'fossil.exe') fullName.
-			pandoc := (FileSystem disk workingDirectory parent / 'Platform' / 'Windows' / 'Programs' / 'Pandoc' / 'pandoc.exe') fullName. ].
-	"localRepository :=  (FileSystem disk workingDirectory / 'Grafoscopio' / 'Projects' / 'SoftwareLibre-Educacion' / 'soliedu.fossil').
-	remoteRepository := 'http://mutabit.com/deltas/repos.fossil/soliedu'".
-]
-
 { #category : #persistence }
 GrafoscopioBrowser >> copyNodeIntoCache: aNode [
 	"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"
@@ -723,7 +726,7 @@ GrafoscopioBrowser >> open [
 { #category : #persistence }
 GrafoscopioBrowser >> openDefault [
 	"Opens a new browser with a default tree"
-	self configureSettings.
+	GrafoscopioBrowser configureSettings.
 	self buildBrowser.
 	mainTree := GrafoscopioNode new.
 	mainTree becomeDefaultTree.
@@ -736,7 +739,7 @@ GrafoscopioBrowser >> openFromFile: aFileName [
 "Opens a tree from a file named aFileName"
 
 	| currentChildren |
-	self configureSettings.
+	GrafoscopioBrowser configureSettings.
 							
 	aFileName isNil ifTrue: [ ^nil ].
 	workingFile := aFileName name asFileReference.
@@ -754,7 +757,7 @@ GrafoscopioBrowser >> openFromFile: aFileName inMode: aModeName [
 "Opens a tree from a file named aFileName"
 
 	| currentChildren |
-	self configureSettings.
+	GrafoscopioBrowser configureSettings.
 							
 	aFileName isNil ifTrue: [ ^nil ].
 	workingFile := aFileName name asFileReference.
@@ -772,7 +775,7 @@ GrafoscopioBrowser >> openFromFileSelector [
 "Opens a tree from a file by using the file selector GUI."
 
 	| fileStream currentChildren |
-	self configureSettings.
+	GrafoscopioBrowser configureSettings.
 	fileStream := UITheme builder 
 							fileOpen: 'Elija un archivo .ston' 
 							extensions: #('ston').
@@ -788,6 +791,22 @@ GrafoscopioBrowser >> openFromFileSelector [
 	browser openOn: mainTree children.
 ]
 
+{ #category : #persistence }
+GrafoscopioBrowser >> openHelpInGrafoscopio [
+"Opens the help tree from a file"
+
+	| currentChildren |
+	GrafoscopioBrowser configureSettings.
+	workingFile := (FileSystem disk workingDirectory parent / 'Docs/Es/Manual/manual-grafoscopio.ston') asFileReference.
+	currentChildren := (STON fromString: workingFile contents).
+	self buildBrowserNamed: workingFile basenameWithIndicator.
+	mainTree := GrafoscopioNode new
+		header: 'Arbol principal';
+		level: 0.
+	mainTree children: currentChildren.
+	browser openOn: mainTree children.
+]
+
 { #category : #'as yet unclassified' }
 GrafoscopioBrowser >> openLandscape [
 	"Opens a new browser with a default tree in landscape mode"