From 5c98c327c38a07e4909d5bff3d0060cafa0b5621 Mon Sep 17 00:00:00 2001
From: Offray Luna <offray.luna@mutabit.com>
Date: Sat, 1 Oct 2016 17:46:49 +0000
Subject: [PATCH] Loading to the last version of Dataviz package.

---
 repository/Grafoscopio/ExternalApp.class.st   | 16 ++++----
 repository/Grafoscopio/FossilRepo.class.st    | 41 -------------------
 .../Grafoscopio/GrafoscopioGUI.class.st       |  6 +--
 3 files changed, 9 insertions(+), 54 deletions(-)
 delete mode 100644 repository/Grafoscopio/FossilRepo.class.st

diff --git a/repository/Grafoscopio/ExternalApp.class.st b/repository/Grafoscopio/ExternalApp.class.st
index 0586574..6c376af 100644
--- a/repository/Grafoscopio/ExternalApp.class.st
+++ b/repository/Grafoscopio/ExternalApp.class.st
@@ -17,14 +17,6 @@ Class {
 	#category : #'Grafoscopio-Model'
 }
 
-{ #category : #installation }
-ExternalApp class >> compareHashFor: aFileName with: aSHAString [
-	
-	aSHAString  = (SHA1 new hashMessage: aFileName asFileReference binaryReadStream contents) hex
-		ifFalse: [ ^ false ]
-		ifTrue: [ ^ true ].
-]
-
 { #category : #configuration }
 ExternalApp class >> configureFossil [
 	"Stablish where is located pandoc according to the operative system and/or the input of the user"
@@ -49,6 +41,14 @@ ExternalApp class >> configurePandoc [
 
 ]
 
+{ #category : #installation }
+ExternalApp class >> file: aFileName hasHash: aSHAString [
+	
+	aSHAString  = (SHA1 new hashMessage: aFileName asFileReference binaryReadStream contents) hex
+		ifFalse: [ ^ false ]
+		ifTrue: [ ^ true ].
+]
+
 { #category : #installation }
 ExternalApp class >> installSQLite32Bits [
 	"I dowload the SQLite binary for the hosting platform, uncompress it and made it available as with the name
diff --git a/repository/Grafoscopio/FossilRepo.class.st b/repository/Grafoscopio/FossilRepo.class.st
deleted file mode 100644
index 1e109cb..0000000
--- a/repository/Grafoscopio/FossilRepo.class.st
+++ /dev/null
@@ -1,41 +0,0 @@
-"
-I model a fossil repository. For details about fossil see:
-
-http://fossil-scm.org/
-"
-Class {
-	#name : #FossilRepo,
-	#superclass : #Object,
-	#instVars : [
-		'url'
-	],
-	#category : #'Grafoscopio-Model'
-}
-
-{ #category : #'as yet unclassified' }
-FossilRepo >> jsonDataFor: aFileName [
-	^ NeoJSONReader fromString: (self jsonStringFor: aFileName) 
-]
-
-{ #category : #'as yet unclassified' }
-FossilRepo >> jsonStringFor: aFileName [
-	| queryForJSONData |
-	queryForJSONData := self url addPathSegments: #('json' 'finfo').
-	queryForJSONData queryAt: 'name' put: aFileName.
-	^ (ZnEasy get: queryForJSONData) contents.
-]
-
-{ #category : #'as yet unclassified' }
-FossilRepo >> lastHashNumberFor: aFileName [
-	^ (((self jsonDataFor: aFileName)  at: 'payload') at: 'checkins') first at: 'uuid'
-]
-
-{ #category : #accessing }
-FossilRepo >> url [
-	^ url
-]
-
-{ #category : #accessing }
-FossilRepo >> url: aString [
-	url := aString asUrl 
-]
diff --git a/repository/Grafoscopio/GrafoscopioGUI.class.st b/repository/Grafoscopio/GrafoscopioGUI.class.st
index 49594bc..dad69a0 100644
--- a/repository/Grafoscopio/GrafoscopioGUI.class.st
+++ b/repository/Grafoscopio/GrafoscopioGUI.class.st
@@ -130,10 +130,6 @@ GrafoscopioGUI class >> dockingBar: anObject [
 { #category : #'graphical interface' }
 GrafoscopioGUI class >> downloadingFrom: downloadUrl withMessage: aString into: location [
 
-	| fileName |
-	
-	fileName := (downloadUrl splitOn: $/) last.
-	(location / fileName) exists ifTrue: [ (location / fileName) ensureDelete ]. 
 	[: bar |
 		bar title: aString.
 		[ZnClient new
@@ -562,7 +558,7 @@ GrafoscopioGUI class >> updateDataviz [
 	Gofer it 
  	  	smalltalkhubUser: 'Offray' project: 'Dataviz';
   	  	configurationOf: 'Dataviz';
-	  	loadVersion: #development.
+	  	load.
 	self inform: 'Actualización del paquete Dataviz terminada'
 ]