modified: c/CtrlCheckLinks.rb

new file:   c/CtrlHistoLink.rb
	modified:   c/Main.rb
	modified:   fichier/haut.html
	deleted:    groupe3.html
	modified:   m/ReadFile.rb
	deleted:    m/ReadFolder.rb
	new file:   sauv/aa
	new file:   sauv/ff
	modified:   v/Vue1.rb
	new file:   v/VueHisto.rb
	new file:   v/VueMenu.rb
	modified:   v/VueResult.rb

m/ReadFile.rb

@@ -1,16 +1,18 @@
+#Classe permettant l'acces et la recuperation des données dans les fichiers
 class ReadFile
-  def initialize(pFic)
+  #Ouverture d'un fichier en lecture
+  def initialize(pFic) 
     @fic = File.open(pFic, "r")
   end
-    
-  def getALL #revoit tout le contenu d'un fichier sous forme d'une chaine de caractere
+  #Revoit tout le contenu d'un fichier sous forme d'une chaine de caractere
+  def getALL 
     all = @fic.read
     return all
   end
-  
-  def getUrls #sort les URLs d'un fichier
+  #Sort les URLs d'un fichier
+  def getUrls 
     txt = self.getALL
-    url = txt.scan(/http[^\s]*/)
+    url = URI::extract(txt, /http(s)?/)
     return url
   end
 end

m/ReadFolder.rb

@@ -1,33 +0,0 @@
-class String #ajout de la méthode à la classe String
-  def liste_rep(espacement = "")
-    #initialisation
-    i=0
-    fich_dir = [""]
-    all_dir = ""
-    liste_exclus = [".", ".."]
-    d = Dir.open(self)
-
-    #sort les fichiers sans . et .. qui nous interresse pas
-    liste_dir = d.sort - liste_exclus
-
-    liste_dir.each { |fichier| #pour chaque fichier touvé
-      case File.ftype(self+fichier)
-        when "directory" #si on trouve un dossier on l'ajoute et on cherche son contenu avec un apelle recursif
-          fich_dir[i] = "#{espacement} + #{fichier}/ \n"
-          espacement += "    "
-          fich_dir[i+1] = (self + fichier + "/").liste_rep(espacement)
-          espacement = espacement[0, espacement.length-4]
-          i+=2
-        when "file" # si c'est un fichier on l'ajoute simplement
-          fich_dir[i] = "#{espacement} - #{fichier} \n"
-          i+=1
-      end
-      
-    }
-    
-    fich_dir.each { |n|
-                    all_dir += n 
-                  }
-    return all_dir; #return l'arboressence des fichiers sous forme d'une chaine de caractere
-  end
-end