From ab80ddd379777ec2ad3234bd5d0eddef04eb95c2 Mon Sep 17 00:00:00 2001 From: Score_Under Date: Thu, 4 Feb 2021 14:45:30 +0000 Subject: [PATCH] Shorter perl one-liner in _gpgconf --- src/_gpgconf | 3 +-- 1 file changed, 1 insertion(+), 2 deletions(-) diff --git a/src/_gpgconf b/src/_gpgconf index f8254a5..5fe8852 100644 --- a/src/_gpgconf +++ b/src/_gpgconf @@ -8,8 +8,7 @@ _gpgconf_component() { local values=( - "${(@f)$(gpgconf --list-components \ - | perl -lne 'my ($name, $desc, $x) = split /:/; print "${name}[$desc]"')}" + "${(@f)$(gpgconf --list-components | perl -F: -ale 'print "${F[0]}[$F[1]]"')}" ) if [ "${action[2]}" = all ]; then values+=('all[All daemon components]')