summaryrefslogtreecommitdiffstats
path: root/clerk
diff options
context:
space:
mode:
authorRasmus Steinke <rasi@xssn.at>2017-08-25 06:30:59 +0200
committerRasmus Steinke <rasi@xssn.at>2017-08-25 06:30:59 +0200
commitff6070fc3e762e19f5361619485381f3cdb5c806 (patch)
tree197adb6366d6aa27ddcb4bebb53c24b1dbcdde66 /clerk
parent50fdaaf2b41efb870a4b125b4b3305ccb5314225 (diff)
downloadperl-app-clerk-ff6070fc3e762e19f5361619485381f3cdb5c806.tar.gz
perl-app-clerk-ff6070fc3e762e19f5361619485381f3cdb5c806.tar.xz
allow to toggle and reset selected items with alt-a and alt-n
Diffstat (limited to 'clerk')
-rwxr-xr-xclerk5
1 files changed, 3 insertions, 2 deletions
diff --git a/clerk b/clerk
index 22ff055..fdc7d2e 100755
--- a/clerk
+++ b/clerk
@@ -180,13 +180,14 @@ sub backend_call {
--no-sort
-m
-e
+ --no-hscroll
-i
-d
\t
--tabstop=4
+s
--ansi),
- "--bind=esc:$random",
+ "--bind=esc:$random,alt-a:toggle-all,alt-n:deselect-all",
"--with-nth=$fields"
],
rofi => [
@@ -326,10 +327,10 @@ sub do_action {
my $uri = (split /[\t\n]/, $line)[-1];
$uri = decode('UTF-8', $uri );
$mpd->add($uri);
+ system(@queue_cmd);
}
if ($action eq "Replace\n") {
$mpd->play();
- system(@queue_cmd);
}
}
}