From aaff6dff3ac0e9b19810fc1bc836f30c19918e5d Mon Sep 17 00:00:00 2001
From: Pascal Rigaux <pixel@mandriva.com>
Date: Wed, 31 Jul 2002 11:59:03 +0000
Subject: make new perl_checker happy

---
 perl-install/mouse.pm | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

(limited to 'perl-install/mouse.pm')

diff --git a/perl-install/mouse.pm b/perl-install/mouse.pm
index 1ab19052a..f41f984ff 100644
--- a/perl-install/mouse.pm
+++ b/perl-install/mouse.pm
@@ -477,7 +477,7 @@ sub test_mouse {
   					  0, 360*64);
 	    }
 	} elsif ($nb == 3) {
-	    $wait=1;
+	    $wait = 1;
 	    $darea->window->draw_pixmap ($darea->style->bg_gc('normal'),
 					 $aru, 0, 0,
 					 ($darea->allocation->[2]-$width)/2+102, ($darea->allocation->[3]-$height)/2 + 57,
@@ -488,7 +488,7 @@ sub test_mouse {
 					 13, 62);
 	    Gtk->timeout_add(200, sub { $wait = 0 });
 	} elsif ($nb == 4) {
-	    $wait=1;
+	    $wait = 1;
 	    $darea->window->draw_pixmap ($darea->style->bg_gc('normal'),
 					 $ard, 0, 0,
 					 ($darea->allocation->[2]-$width)/2+102, ($darea->allocation->[3]-$height)/2 + 131,
-- 
cgit v1.2.1