summaryrefslogtreecommitdiffstats
path: root/.local/bin/linkview
diff options
context:
space:
mode:
Diffstat (limited to '')
-rwxr-xr-x.local/bin/linkview20
1 files changed, 10 insertions, 10 deletions
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;