From 32dc4bc66691a975d4366c3c46f809f68a6b43be Mon Sep 17 00:00:00 2001 From: joe Date: Thu, 21 Aug 2025 17:38:47 +0200 Subject: up --- .local/bin/linkview | 20 ++++++++++---------- 1 file changed, 10 insertions(+), 10 deletions(-) (limited to '.local/bin/linkview') diff --git a/.local/bin/linkview b/.local/bin/linkview index 94f6e66..0f8dff5 100755 --- a/.local/bin/linkview +++ b/.local/bin/linkview @@ -33,14 +33,14 @@ use constant { }; my %func_list = ( - 'vid' => \&vid, - 'img' => \&img_pdf, - 'dl' => \&dl, - 'audio' => \&audio, - 'pdf' => \&img_pdf, - 'w3m' => \&w3m, - 'browser' => \&browser, - 'clip' => \&clip, + '1 vid' => \&vid, + '2 img' => \&img_pdf, + '3 dl' => \&dl, + '4 audio' => \&audio, + '5 pdf' => \&img_pdf, + '6 w3m' => \&w3m, + '7 browser' => \&browser, + '8 clip' => \&clip, ); use constant QUAL_LIST => "" . @@ -148,7 +148,7 @@ sub img_pdf $ext =~ s/\?.*//; $new_file_name = $uuid . $ext; rename($file_name, $new_file_name) or die $!; - if ($key eq "img") { + if ($key eq "2 img") { $ret = system(IMGVIEW_PATH . " " . $new_file_name); } else { @@ -498,7 +498,7 @@ sub fzf_prompt { my ($url) = @_; my $answer; - my $list = join("\n", keys %func_list); + my $list = join("\n", sort keys %func_list); $answer = `printf "$list\n" | $menu --prompt '$url > '`; chomp $answer; -- cgit v1.2.3