1
0

Make flashget work with Freshplayer Plugin

This commit is contained in:
Noah 2015-06-15 19:23:49 -07:00
parent 2ec75b4cb2
commit 0ccdce5241

View File

@ -39,7 +39,7 @@ foreach my $pid (sort { $a <=> $b } (grep(/^\d+$/, readdir($proc)))) {
# Look for a Flash video link.
$link =~ s/\s*\(deleted\)//g; # Remove the " (deleted)" extensions.
if ($link =~ m{^/tmp/(Flash.*?)$} || $link =~ m{Shockwave Flash/\.(.+?)$}) {
if ($link =~ m{^/tmp/((?:Flash|FreshTemp).*?)$} || $link =~ m{Shockwave Flash/\.(.+?)$}) {
# Copy it.
my $dest = "$home/$1.flv";
print "Recover from PID $pid: $id -> $dest\n";