diff options
| author | Christian Pointner <equinox@helsinki.at> | 2013-08-01 13:49:42 (GMT) |
|---|---|---|
| committer | Christian Pointner <equinox@helsinki.at> | 2013-08-01 13:49:42 (GMT) |
| commit | 0755ac5fb5784dcf0d63e21dcea191aa65a3fe97 (patch) | |
| tree | 86a10cf693386c8ee4f2e54dc5fbf6780e1bfbb6 /rhimport.pm | |
| parent | f60bb31ae5ef922c1737604b37bbad12bc7f42f5 (diff) | |
added workardound for new audacious playlist format
Diffstat (limited to 'rhimport.pm')
| -rw-r--r-- | rhimport.pm | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/rhimport.pm b/rhimport.pm index 359ca5c..669a2b1 100644 --- a/rhimport.pm +++ b/rhimport.pm @@ -28,6 +28,7 @@ package rhimport; use IO::Handle; use IPC::Open3; use File::Spec; +use URI::Escape; my $ssh_host = "airplay"; my $ssh_user = "rhimport"; @@ -176,6 +177,8 @@ sub import_playlist next if($entry =~ /^#/); next if($entry =~ /^\s/); $entry =~ s/\n$//; + $entry =~ s/^file:\/\///; + $entry = uri_unescape($entry); next if(-d $entry); next if(!-r $entry); push @entries, $entry; |