Typo fix and more obvious gradient

1 files changed, 4 insertions, 4 deletions

diff --git a/exemples/exemple_MMover_MInertie.pl b/exemples/exemple_MMover_MInertie.pl
index fd1f4f1..569396b 100755
--- a/exemples/exemple_MMover_MInertie.pl
+++ b/exemples/exemple_MMover_MInertie.pl
@@ -28,10 +28,10 @@ use MTools::Comp::MInertie;
 new MTools (800, 600, 'Exemple MMover et MInertie');
 
 # Creation des objets delimitant l'espace
-new MTools::GUI::MRect (1, 0, 0, 650, 450, -fillcolor => "=axial 90 | #526266 | #667C80", -filled => 1);
+new MTools::GUI::MRect (1, 0, 0, 650, 450, -fillcolor => "=axial 90 | #526266 | #A2C4CB", -filled => 1);
 new MTools::GUI::MRect (1, 250, 300, 400, 150, -linecolor => 'black');
 
-# Creation de l'objet deplace
+# Creation de l'objet deplacable
 my $target = minstanciate ('Ampoule.svg#on', 1);
 
 # Ajout du comportement MMover à l'objet
@@ -44,8 +44,8 @@ new MTools::Comp::MInertie ($mover);
 mrun;
 
 # La fonction permet de conserver l'objet dans un espace controle
-# Elle recoit en parametre l'ancienne position de l'objet ainsi que le deplacement suggerer
-# Elle retourne un vecteur correspondant a la correction effectuee sur le deplacement
+# Elle recoit en parametre l'ancienne position de l'objet ainsi que le deplacement suggeré
+# Elle retourne un vecteur correspondant à la correction à effectuer sur le deplacement
 sub allowmove {
 	my ($x, $y, $dx, $dy) = @_;
 	if ($x > 200)