diff options
Diffstat (limited to 'perl-install/mouse.pm')
-rw-r--r-- | perl-install/mouse.pm | 6 |
1 files changed, 2 insertions, 4 deletions
diff --git a/perl-install/mouse.pm b/perl-install/mouse.pm index 8ba23f7c4..cc164e38e 100644 --- a/perl-install/mouse.pm +++ b/perl-install/mouse.pm @@ -383,8 +383,7 @@ sub various_xfree_conf { if ($mouse->{nbuttons} <= 5) { unlink($f); } else { - output_p($f, "xmodmap -e 'pointer = 1 2 3 6 7 4 5'\n"); - chmod 0755, $f; + output_with_perm($f, 0755, "xmodmap -e 'pointer = 1 2 3 6 7 4 5'\n"); } } { @@ -393,8 +392,7 @@ sub various_xfree_conf { unlink($f); } else { $in->do_pkgs->install('xinput'); - output_p($f, "xinput set-button-map Mouse2 1 2 3 6 7 4 5\n"); - chmod 0755, $f; + output_with_perm($f, 0755, "xinput set-button-map Mouse2 1 2 3 6 7 4 5\n"); } } } |