diff options
author | damien <damien@mandriva.com> | 2001-09-12 12:47:36 +0000 |
---|---|---|
committer | damien <damien@mandriva.com> | 2001-09-12 12:47:36 +0000 |
commit | ed95488bbb2420c7d0eb6779b21aee493cd8f3e2 (patch) | |
tree | 852fcd601d8c56f3904154bb9d1c05427fb22baf /perl-install | |
parent | b31dadf9d682ace5976f2e02a3669c6050cddf69 (diff) | |
download | drakx-ed95488bbb2420c7d0eb6779b21aee493cd8f3e2.tar drakx-ed95488bbb2420c7d0eb6779b21aee493cd8f3e2.tar.gz drakx-ed95488bbb2420c7d0eb6779b21aee493cd8f3e2.tar.bz2 drakx-ed95488bbb2420c7d0eb6779b21aee493cd8f3e2.tar.xz drakx-ed95488bbb2420c7d0eb6779b21aee493cd8f3e2.zip |
removed debug code
Diffstat (limited to 'perl-install')
-rw-r--r-- | perl-install/mouse.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/perl-install/mouse.pm b/perl-install/mouse.pm index 6222e322f..cad364d90 100644 --- a/perl-install/mouse.pm +++ b/perl-install/mouse.pm @@ -468,7 +468,7 @@ sub test_mouse { my ($aru, $aru_mask) = gtkcreate_xpm($darea, 'arrow_up.xpm'); my ($ard, $ard_mask) = gtkcreate_xpm($darea, 'arrow_down.xpm'); my $image = $m3_image; - $mouse->{nbuttons} > 3 || 1 and $image = $m3_imagep; + $mouse->{nbuttons} > 3 and $image = $m3_imagep; my $draw_text = sub { my ($t, $y) = @_; my $font = $darea->style->font; |