Skip to content

Instantly share code, notes, and snippets.

#!/bin/sh
TIMEOUT=15
QUIET=0
echoerr() {
if [ "$QUIET" -ne 1 ]; then printf "%s\n" "$*" 1>&2; fi
}
usage() {
#!/usr/bin/env perl
my $output = qx/xinput list/;
my ($id) = ($output =~ m/Touchpad\s+id=(\d+)/);
my $props = qx/xinput --list-props $id/;
my ($prop) = ($props =~ m/Finger\s\((\d+)\)/);
qx/xinput --set-prop $id $prop 5, 10, 0/;