From 3c873e24757cf87f0c4a713994e521abfa54afc0 Mon Sep 17 00:00:00 2001
From: Offray Luna <offray.luna@mutabit.com>
Date: Fri, 30 Sep 2016 19:10:34 +0000
Subject: [PATCH] FossilRepo support for the creation given url in a string.

---
 repository/Grafoscopio/FossilRepo.class.st | 15 +++++++++++++++
 1 file changed, 15 insertions(+)

diff --git a/repository/Grafoscopio/FossilRepo.class.st b/repository/Grafoscopio/FossilRepo.class.st
index 05a24df..a1377a6 100644
--- a/repository/Grafoscopio/FossilRepo.class.st
+++ b/repository/Grafoscopio/FossilRepo.class.st
@@ -1,3 +1,8 @@
+"
+I model a fossil repository. For details about fossil see:
+
+http://fossil-scm.org/
+"
 Class {
 	#name : #FossilRepo,
 	#superclass : #Object,
@@ -6,3 +11,13 @@ Class {
 	],
 	#category : #'Grafoscopio-Model'
 }
+
+{ #category : #accessing }
+FossilRepo >> url [
+	^ url
+]
+
+{ #category : #accessing }
+FossilRepo >> url: aString [
+	url := aString asUrl 
+]