From 6e0b00ac532e3ecb38e50204bcd5cf84af2cbe37 Mon Sep 17 00:00:00 2001
From: Offray Luna <offray.luna@mutabit.com>
Date: Wed, 18 May 2016 17:56:03 +0000
Subject: [PATCH] GrafoscopioBrowser will be deprecated. Its funcionality
 should be on GrafoscopioGUI and GrafoscopioNotebook.

---
 .../Grafoscopio/GrafoscopioBrowser.class.st   | 47 -------------------
 .../Grafoscopio/GrafoscopioGUI.class.st       | 47 +++++++++++++++++++
 2 files changed, 47 insertions(+), 47 deletions(-)

diff --git a/repository/Grafoscopio/GrafoscopioBrowser.class.st b/repository/Grafoscopio/GrafoscopioBrowser.class.st
index d38e5c5..7609c12 100644
--- a/repository/Grafoscopio/GrafoscopioBrowser.class.st
+++ b/repository/Grafoscopio/GrafoscopioBrowser.class.st
@@ -275,53 +275,6 @@ GrafoscopioBrowser class >> showSettings [
 	Transcript show: pandoc 
 ]
 
-{ #category : #'graphical interface' }
-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.
-	Some of the functionalities implemented now in the grafoscopio interface for document trees should be moved here, like the ones
-	related with help, external tools and grafoscopio updates and about"
-
-	| launchMenu helpMenu updateMenu |
-	
-	launchMenu := MenuMorph new.
-	launchMenu 
-		add: 'New notebook' target: self selector: #open;
-		add: 'Notebook from file...' target: (self new) selector: #openFromFileSelector;
-		add: 'Notebook from Internet...' target: (self new) selector: #openFromUrlUI;
-	 	add: 'Recent notebooks...' target: self selector: #openFromRecentlyUsed;
-		add: 'Example notebooks...' target: self selector: #messageNotImplementedYet;
-		add: 'Roassal visualizations gallery' target: (RTExampleBrowser new) selector: #open;
-		add: 'Playground' target: (Smalltalk tools) selector: #openWorkspace;
-		add: 'Transcript' target: (Smalltalk tools) selector: #openTranscript.
-
-	updateMenu := MenuMorph new.
-	updateMenu
-		add: 'Grafoscopio' target: self selector: #updateGrafoscopioUI;
-		add: 'Documentation' target: self selector: #updateDocumentationUI;
-		add: 'DataViz package' target: self selector: #updateDatavizUI;
-		add: 'Database engine' target: ExternalApp selector: #installSQLite32BitsUI;
-		add: 'Pandoc path' target: ExternalApp selector: #configurePandoc;
-		add: 'Fossil path' target: ExternalApp selector: #configureFossil;
-		add: 'All the system' target: self selector: #updateSystem.
-	
-	helpMenu := MenuMorph new.
-	helpMenu 
-		add: 'Tutorial in Grafoscopio' target: (self new) selector: #openTutorialInGrafoscopio;
-		add: 'PDF Manual' target: self selector: #openHelpInPdf;
-	 	add: 'HTML Manual' target: self selector: #openHelpInHtml;
-		add: 'Manual in grafoscopio' target: (self new) selector: #openHelpInGrafoscopio;
-		add: 'About Grafoscopio' target: self selector: #messageAbout.
-		
-	dockingBar := DockingBarMorph new.
-	dockingBar 
-		add: 'Launch' subMenu: launchMenu;
-		add: 'Update' subMenu: updateMenu;
-		add: 'Help' subMenu: helpMenu.
-   dockingBar 
-		adhereToTop;
-     	openInWorld.
-]
-
 { #category : #updating }
 GrafoscopioBrowser class >> updateDataviz [
 	"I'm update the Dataviz package with new versions of itself take from the source code repository.
diff --git a/repository/Grafoscopio/GrafoscopioGUI.class.st b/repository/Grafoscopio/GrafoscopioGUI.class.st
index 46d9d20..c065704 100644
--- a/repository/Grafoscopio/GrafoscopioGUI.class.st
+++ b/repository/Grafoscopio/GrafoscopioGUI.class.st
@@ -227,6 +227,53 @@ GrafoscopioGUI class >> exampleBootstrapUI [
 	ui openWithSpecLayout: lay.
 ]
 
+{ #category : #'graphical interface' }
+GrafoscopioGUI 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.
+	Some of the functionalities implemented now in the grafoscopio interface for document trees should be moved here, like the ones
+	related with help, external tools and grafoscopio updates and about"
+
+	| launchMenu helpMenu updateMenu |
+	
+	launchMenu := MenuMorph new.
+	launchMenu 
+		add: 'New notebook' target: self selector: #open;
+		add: 'Notebook from file...' target: (self new) selector: #openFromFileSelector;
+		add: 'Notebook from Internet...' target: (self new) selector: #openFromUrlUI;
+	 	add: 'Recent notebooks...' target: self selector: #openFromRecentlyUsed;
+		add: 'Example notebooks...' target: self selector: #messageNotImplementedYet;
+		add: 'Roassal visualizations gallery' target: (RTExampleBrowser new) selector: #open;
+		add: 'Playground' target: (Smalltalk tools) selector: #openWorkspace;
+		add: 'Transcript' target: (Smalltalk tools) selector: #openTranscript.
+
+	updateMenu := MenuMorph new.
+	updateMenu
+		add: 'Grafoscopio' target: self selector: #updateGrafoscopioUI;
+		add: 'Documentation' target: self selector: #updateDocumentationUI;
+		add: 'DataViz package' target: self selector: #updateDatavizUI;
+		add: 'Database engine' target: ExternalApp selector: #installSQLite32BitsUI;
+		add: 'Pandoc path' target: ExternalApp selector: #configurePandoc;
+		add: 'Fossil path' target: ExternalApp selector: #configureFossil;
+		add: 'All the system' target: self selector: #updateSystem.
+	
+	helpMenu := MenuMorph new.
+	helpMenu 
+		add: 'Tutorial in Grafoscopio' target: (self new) selector: #openTutorialInGrafoscopio;
+		add: 'PDF Manual' target: self selector: #openHelpInPdf;
+	 	add: 'HTML Manual' target: self selector: #openHelpInHtml;
+		add: 'Manual in grafoscopio' target: (self new) selector: #openHelpInGrafoscopio;
+		add: 'About Grafoscopio' target: self selector: #messageAbout.
+		
+	dockingBar := DockingBarMorph new.
+	dockingBar 
+		add: 'Launch' subMenu: launchMenu;
+		add: 'Update' subMenu: updateMenu;
+		add: 'Help' subMenu: helpMenu.
+   dockingBar 
+		adhereToTop;
+     	openInWorld.
+]
+
 { #category : #initialization }
 GrafoscopioGUI >> initializePresenter [
 	tree.