aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authoracronymized <acronymized@server.fake>2013-01-18 19:47:18 +0200
committeracronymized <acronymized@server.fake>2013-01-18 19:47:18 +0200
commit83e5b383d07b69db7271bfa38e754aeb9026f7b3 (patch)
tree698a4e1aa788cf202bd0c57b174e68d2ea5c7fca
parent188f1450a2d227d5863a454fdf45222257a5e511 (diff)
downloadget-flash-videos-83e5b383d07b69db7271bfa38e754aeb9026f7b3.tar.gz
fixed Redtube title
-rw-r--r--lib/FlashVideo/Site/Redtube.pm2
1 files changed, 1 insertions, 1 deletions
diff --git a/lib/FlashVideo/Site/Redtube.pm b/lib/FlashVideo/Site/Redtube.pm
index 1b54986..a748974 100644
--- a/lib/FlashVideo/Site/Redtube.pm
+++ b/lib/FlashVideo/Site/Redtube.pm
@@ -8,7 +8,7 @@ use URI::Escape;
sub find_video {
my($self, $browser, $embed_url) = @_;
- my($title) = $browser->content =~ /<h1 class="videoTitle">([^<]+)</;
+ my($title) = extract_title($browser) =~ /(.*) \|/;
my($url) = $browser->content =~ /mp4_url=([^&"]+)/;
$url = uri_unescape($url);