summaryrefslogtreecommitdiffstats
path: root/perl-install
diff options
context:
space:
mode:
authordamien <damien@mandriva.com>2001-09-12 12:47:36 +0000
committerdamien <damien@mandriva.com>2001-09-12 12:47:36 +0000
commited95488bbb2420c7d0eb6779b21aee493cd8f3e2 (patch)
tree852fcd601d8c56f3904154bb9d1c05427fb22baf /perl-install
parentb31dadf9d682ace5976f2e02a3669c6050cddf69 (diff)
downloaddrakx-backup-do-not-use-ed95488bbb2420c7d0eb6779b21aee493cd8f3e2.tar
drakx-backup-do-not-use-ed95488bbb2420c7d0eb6779b21aee493cd8f3e2.tar.gz
drakx-backup-do-not-use-ed95488bbb2420c7d0eb6779b21aee493cd8f3e2.tar.bz2
drakx-backup-do-not-use-ed95488bbb2420c7d0eb6779b21aee493cd8f3e2.tar.xz
drakx-backup-do-not-use-ed95488bbb2420c7d0eb6779b21aee493cd8f3e2.zip
removed debug code
Diffstat (limited to 'perl-install')
-rw-r--r--perl-install/mouse.pm2
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;