From a6afc8abf3f8adfedadc47b173590c67424d8f7c Mon Sep 17 00:00:00 2001
From: Monsieur Video <monsieurvideo@gmail.com>
Date: Mon, 11 May 2009 20:06:40 +0000
Subject: [PATCH] Look at <iframe> too, to handle videos embedded like that.

---
 FlashVideo/URLFinder.pm | 4 ++--
 get_flash_videos        | 2 +-
 2 files changed, 3 insertions(+), 3 deletions(-)

diff --git a/FlashVideo/URLFinder.pm b/FlashVideo/URLFinder.pm
index b9c9c3a0..4c0f80f7 100644
--- a/FlashVideo/URLFinder.pm
+++ b/FlashVideo/URLFinder.pm
@@ -24,8 +24,8 @@ sub find_package {
     # element (avoids grabbing things like codebase attribute).
     # Also look at embedded scripts for sites which embed their content that way.
  
-    URLS: for my $possible_url(
-        $browser->content =~ m!(?:<object[^>]+>.*?|<(?:script|embed) [^>]*src=["']?)(http://[^"'> ]+)!gx) {
+    for my $possible_url($browser->content =~
+        m!(?:<object[^>]+>.*?|<(?:script|embed|iframe) [^>]*src=["']?)(http://[^"'> ]+)!gix) {
       $package = find_package_url($possible_url, $browser);
       return $package, $possible_url if defined $package;
     }
diff --git a/get_flash_videos b/get_flash_videos
index e820df4d..caff325f 100755
--- a/get_flash_videos
+++ b/get_flash_videos
@@ -27,7 +27,7 @@ use FlashVideo::RTMPDownloader;
 use FlashVideo::Utils;
 use FlashVideo::GoogleVideoSearch;
 
-use constant VERSION => "1.10";
+use constant VERSION => "1.11";
 
 use constant VER_INFO => <<EOF;
 get_flash_videos version @{[VERSION]} (http://code.google.com/p/get-flash-videos/)