diff options
| author | Pascal Rigaux <pixel@mandriva.com> | 2000-07-10 16:33:21 +0000 |
|---|---|---|
| committer | Pascal Rigaux <pixel@mandriva.com> | 2000-07-10 16:33:21 +0000 |
| commit | 640255572c30658ad75a7ed7948617dd56fdeaa4 (patch) | |
| tree | aad1cfd9e13b4490a611dbdd51200621b65fe4ed /perl-install/standalone/mousedrake | |
| parent | 8177c7b2bdc55ff489f39c471085db9064ae359b (diff) | |
| download | drakx-backup-do-not-use-640255572c30658ad75a7ed7948617dd56fdeaa4.tar drakx-backup-do-not-use-640255572c30658ad75a7ed7948617dd56fdeaa4.tar.gz drakx-backup-do-not-use-640255572c30658ad75a7ed7948617dd56fdeaa4.tar.bz2 drakx-backup-do-not-use-640255572c30658ad75a7ed7948617dd56fdeaa4.tar.xz drakx-backup-do-not-use-640255572c30658ad75a7ed7948617dd56fdeaa4.zip | |
no_comment
Diffstat (limited to 'perl-install/standalone/mousedrake')
| -rwxr-xr-x | perl-install/standalone/mousedrake | 10 |
1 files changed, 5 insertions, 5 deletions
diff --git a/perl-install/standalone/mousedrake b/perl-install/standalone/mousedrake index ee5c72d54..d40bcff62 100755 --- a/perl-install/standalone/mousedrake +++ b/perl-install/standalone/mousedrake @@ -44,14 +44,14 @@ modules::write_conf('') if $mouse->{device} eq "usbmouse" && !$::testing; my $f = "/etc/X11/XF86Config"; my $g = "/etc/X11/XF86Config-4"; + +my $zaxis = "\n ZAxisMapping 4 5" if $mouse->{nbuttons} > 3; + $zaxis .= "\n ZAxisMapping 6 7" if $mouse->{nbuttons} > 5; substInFile { if (/^Section "Pointer"/ .. /^EndSection/) { + $_ = '' if /ZAxisMapping/; #- remove existing line s|^(\s*Protocol\s+).*|$1"$mouse->{XMOUSETYPE}"|; - s|^(\s*Device\s+).*|$1"/dev/mouse"|; -#- my $zaxis = "4 5" if $mouse->{nbuttons} > 3; -#- $zaxis .= " 6 7" if $mouse->{nbuttons} > 5; -#- s|^(\s*ZAxisMapping\s+).*|$1$zaxis| if $zaxis; -#- s|^([#]\s*ZAxisMapping\s+).*|# ZAxisMapping\t\n|; } + s|^(\s*Device\s+).*|$1"/dev/mouse"$zaxis|; } } $f if -e $f && !$::testing; substInFile { |