summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorPascal Rigaux <pixel@mandriva.com>2001-01-05 17:10:06 +0000
committerPascal Rigaux <pixel@mandriva.com>2001-01-05 17:10:06 +0000
commit85e3ac6e225bd09cfa913a3a3812335f99cbfd3c (patch)
tree39a752745ccf0b6c097bedb3123018336fcf1779
parentb33c8397c67519e501a2d30d606d847b58eeef69 (diff)
downloaddrakx-backup-do-not-use-85e3ac6e225bd09cfa913a3a3812335f99cbfd3c.tar
drakx-backup-do-not-use-85e3ac6e225bd09cfa913a3a3812335f99cbfd3c.tar.gz
drakx-backup-do-not-use-85e3ac6e225bd09cfa913a3a3812335f99cbfd3c.tar.bz2
drakx-backup-do-not-use-85e3ac6e225bd09cfa913a3a3812335f99cbfd3c.tar.xz
drakx-backup-do-not-use-85e3ac6e225bd09cfa913a3a3812335f99cbfd3c.zip
help cperl-mode
-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 7d0cb80c4..7f75d61b7 100644
--- a/perl-install/mouse.pm
+++ b/perl-install/mouse.pm
@@ -158,7 +158,7 @@ sub read {
sub write {
my ($prefix, $mouse) = @_;
- local $mouse->{FULLNAME} = qq("$mouse->{type}|$mouse->{name}");
+ local $mouse->{FULLNAME} = qq("$mouse->{type}|$mouse->{name}"); #-"
local $mouse->{XEMU3} = bool2yesno($mouse->{nbuttons} < 3);
local $mouse->{WHEEL} = bool2yesno($mouse->{nbuttons} > 3);
setVarsInSh("$prefix/etc/sysconfig/mouse", $mouse, qw(MOUSETYPE XMOUSETYPE FULLNAME XEMU3 WHEEL device));