From c8eb08fd139c7072a169b2299e56667cc0e64912 Mon Sep 17 00:00:00 2001 From: joe Date: Thu, 21 Aug 2025 19:25:37 +0200 Subject: up --- .local/bin/linkview | 25 ++++--------------------- 1 file changed, 4 insertions(+), 21 deletions(-) diff --git a/.local/bin/linkview b/.local/bin/linkview index 772ae6e..9c0d700 100755 --- a/.local/bin/linkview +++ b/.local/bin/linkview @@ -29,27 +29,10 @@ use constant { HOSTNAME => (split /\./, hostname())[0] }; -my @keys = ( - 'vid', - 'img', - 'dl', - 'audio', - 'pdf', - 'w3m', - 'web', - 'clip', -); - -my %func_list = ( - $keys[0] => \&vid, - $keys[1] => \&img_pdf, - $keys[2] => \&dl, - $keys[3] => \&audio, - $keys[4] => \&img_pdf, - $keys[5] => \&w3m, - $keys[6] => \&web, - $keys[7] => \&clip, -); +my @keys = ( 'vid', 'img', 'dl', 'audio', 'pdf', 'w3m', 'web', 'clip' ); +my @func_refs = ( \&vid, \&img_pdf, \&dl, \&audio, \&img_pdf, \&w3m, \&web, \&clip ); +my %func_list; +@func_list{@keys} = @func_refs; use constant QUAL_LIST => "" . "uncap" . "\n" . -- cgit v1.2.3