diff options
| author | joe <rbo@gmx.us> | 2025-08-21 19:25:37 +0200 |
|---|---|---|
| committer | joe <rbo@gmx.us> | 2025-08-21 19:25:37 +0200 |
| commit | c8eb08fd139c7072a169b2299e56667cc0e64912 (patch) | |
| tree | 25671e8099b742fa206cb6c7c72af3a4ed300ea1 /.local/bin/linkview | |
| parent | up (diff) | |
| download | dotfiles-bsd-c8eb08fd139c7072a169b2299e56667cc0e64912.tar.gz dotfiles-bsd-c8eb08fd139c7072a169b2299e56667cc0e64912.tar.bz2 dotfiles-bsd-c8eb08fd139c7072a169b2299e56667cc0e64912.tar.xz dotfiles-bsd-c8eb08fd139c7072a169b2299e56667cc0e64912.tar.zst dotfiles-bsd-c8eb08fd139c7072a169b2299e56667cc0e64912.zip | |
up
Diffstat (limited to '')
| -rwxr-xr-x | .local/bin/linkview | 25 |
1 files 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" . |