diff options
-rw-r--r-- | MANIFEST | 2 | ||||
-rwxr-xr-x | bin/gtk-fair-viewer | 10 |
2 files changed, 9 insertions, 3 deletions
@@ -37,3 +37,5 @@ share/icons/user.png t/00-load.t t/kwalitee.t t/pod.t +utils/auto_perltidy.sh +utils/bak_cleaner.sh diff --git a/bin/gtk-fair-viewer b/bin/gtk-fair-viewer index d6b9124..dd06cfa 100755 --- a/bin/gtk-fair-viewer +++ b/bin/gtk-fair-viewer @@ -1347,9 +1347,13 @@ sub menu_popup { my $item = 'Gtk3::ImageMenuItem'->new("Play as audio"); $item->signal_connect( activate => sub { - my ($video_id, $iter) = get_selected_entry_code(); - if (defined($video_id) and $liststore->get($iter, 7) eq 'video') { - execute_cli_fair_viewer("--id=$video_id --no-video"); + my ($id, $iter) = get_selected_entry_code(); + my $type = $liststore->get($iter, 7); + if (defined($id) and $type eq 'video') { + execute_cli_fair_viewer("--id=$id --no-video"); + } + elsif (defined($id) and $type eq 'playlist') { + execute_cli_fair_viewer("--pp=$id --no-video"); } } ); |